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ディ スケ ッ ト を 両面 使う 方法 


0 ディ スク は いっ た い 何 の た め 


「 デ ィ ス ク な ん て , いっ た い 何 の た め に ある 
ん だ ろう ? カセ ッ ト テ ー プ が ある か らい いじ 
ゃ な いか ? 」 と , お 思い の 方 は いま せん か . そ 
う で す . カセ ッ ト テ ー プ と 同じ も の だ っ た ら , 
ある い は , ち ょ っ と し か 違わ な いも の だ っ た ら , 
何 も デ ィ ス ク な ん て 買う 必要 は な い の で す . 実 
際 , PC-8001 専用 の ディ スク 装置 PC-8031 は , 
値段 が 31 万 円 (PC-8001 本 体 の 何と 約 2 倍 / ) . 
ディ スク が どう し て そん な 価値 が ある の か と , 
不思議 に 思わ れる の は ご く 当然 の こと で す . こ 
の 本 で は , この 問題 「 デ ィ ス ク は どう し て 必要 
か ?.」 を 考え て いこ うと 思い ます 。 

この 本 を 一 冊 読 み 終 えん た と き , きっ と あな た 
は ディ スク が ほし く な っ て くる に 直 い あり ませ 
ん . つま り デ ィ ス ク が 単なる 情報 の 保存 装置 で 
は な く , 巨大 な ソフ トウ エア の か た まり で あり , 
マイ コン を 一 応 ミ ニコ ン 並 み の レ ベル に 引き あ 
げ ば る も の で ある こと が , きっ と お わか り に な る 
に 違い な い の で す . 


さる で お の この 章 で は クィ スク の ベニ ドウ 
ア の も つ メ リッ ト と デメ リッ ト を 考え て いき ま 
生 の 。 
メリ ッ ト 
フロ ッ ピ ー デ ィ ス クシ ステ ム の メリ ッ ト は 
O 動作 が 速い / 
・ 記 憶 容量 が 大 きい / 
・ ラ ンダ ム ア ク セス が で きる / 
の 3 点 で あり ます . 以下 に それ ぞ れ の メリ ッ ト 
に つい て 解説 し ます が , 注意 し て ほし い の は 個々 
の メリ ッ ト が ある た め に フロ ッ ピ ー シ ス テム が 
便利 で ある と いう より も , 3 つの メリ ッ ト が そ 
ろ っ て 全体 と し て 本 当 に 便利 と いえ る シス テム 
に な っ て いる と いう こと で す . 
メリ ッ ト そ の 1 動作 が 速い / 
単純 に フロ ッ ピ ー デ ィ ス ク の ディ スケ ッ ト 面 へ 
の 読み 書き の 時 間 だ け を 考え て み ま し ょ う . 公 
表 き れ て いる デー タ に よれ ば , 4096 バ イト の 情 
報 の 読み 書き に 必要 な 時 間 は 最小 で 0.3 秒 , 最大 


で 1.82 秒 だ と され て いま す . 

この 時 間 は ,. ディ スケ ッ ト 面 の 読み 書き を す 
る ヘッ ド が 移動 する た め の 時 間 を 含ん で いま す . 
つま り 最 小 時 間 と いう の は , ヘッ ド が 移動 せ ず 
に 読み 書き を 行っ た 時 の 時 間 で , 最大 時 間 と い 
う の は ヘッ ド が ディ スケ ッ ト の 端 か ら 端 まで 移 
動 し て 読み 書き する 時 間 で す . (実際 の 使用 で は 
ヘッ ド が ディ スケ ッ ト の 端 か ら 端 まで 移動 する 
と いう こと は めった に あり ませ ん .)Disk BASIC 
で は フロ ッ ピ ー デ ヂ ディスク シス テム を 効果 的 に 利 
用 する た め に ディ スケ ッ ト 上 に いろ いろ な 情報 
を 載せ て いて , これ を 参照 し な が ら 読 み 書 き を 
し ます か ら も う 少 し 時 間 が か か る で し ょ う .( こ 
の 点 に つい て は , 第 3 章 で 詳し く 説 明 し ます . ) 
メリ ッ ト そ の 2 記憶 容量 が 大 きい / 

さて , ディ スケ ッ ト 1 枚 に は 何 バ イト の デー タ 
を 記録 で きる の で し ょ うか ? 

答え 143.36K バイ ト で す , 同時 に 2 枚 の ディ 
スケ ッ ト を 使用 で きま すか ら , ユニ ッ ト 当 り で 
286.72K バイ ト 記 録 で きる こと に な り ま す . が , 
先 に も 書い た よう に , ディ スケ ッ ト 上 に は , シ 
ステ ム を 効果 的 に 使用 する た め の 情 報 も 記録 さ 
れ て いま すか ら 286.72K バイ ト す べ て 使用 者 が 
使う こと は で きま せん . シス テム 用 の 情報 量 は 
4 096 バ イト で す が , PC-8031 (8032) に 付い て 
の シン スン バッ の と 人 レ ペ パ ン 2 に ES ニニ 画 だ の 誠 ペグ 4【 は 3 さ 
ら に 12,288 バ イト 必要 な の で 合計 で 16,384 バ イ 
ト が シス テム 用 の 情報 量 と な り ま す . 従っ て 使 
用 者 が 使え る 容量 は 

シス テム ディ スク で 126.976K バイ ト 

その 他 の ディ スク で 139.264K バイ ト 
に な り ま す . 

この 容量 を 大 容量 と する か , 少 容量 と する か 
は あな た の 考え 方 次 第 で す が , 一 本 の プロ グラ 
ム , 一 組 の デー タ の 集合 を 記録 する の に 容量 が 
足り な く な る こと は まず な いで し ょ う . 


メリ ッ ト そ の 3 ラン ダム アク セス 方 式 が で 


Me) 


きる / 

ラン ダム アク セス 可能 と いう こと は 先 に 書い 
だ た 2 つの メリ ッ ト と 密接 に 関係 し て いる の で す 
が , その 説明 を する 前 に 「 ラ ンダ ム ア ク セス 」 
と は 何 か を 説明 し まし ょ う . つい で に 「 シ ー ケ 
ン シ ャ ル ア ク セス 」 に つい て も 説明 し ます . 

まず 「 ア クセ ス 」 と は , 多量 の デー タ の 中 か 
ら 目的 と する デー タ を 選び 出す こと で す . ディ 
スク の 場合 に は ディ スケ ッ ト 上 の 目的 の 場所 を 
読む と か , 目的 の 場所 に 書き こむ 動作 が 「 ア ク 
セス 」 に あたる わけ で す . 

さて ,「 ア クセ ス 」 を 知っ た と ころ で ラン ダム 
アク セス 方 式 と シー ケン シャ ル ア ク セス 方 式 の 
説明 に 入り まし ょ う . まず 身近 な 音楽 の 例 か ら 
紹介 し ます . いく つも の 歌 が 録音 され た レコ ー 
ド と カセ ッ ト テ ー プ が ある と し ます . ラン ダム 
アク セス と は レコ ー ド の 中 か ら 好 き な 曲 を 1 つ 
選ぶ な こと, シー ケン シャ ル ア ク セス と は テー プ 
の 中 か ら 好 き な 曲 を 1 つ 選 ぶ こ と に 相当 し ます . 
こう 書い た だ け で は 「 同 じじ し ゃ な いか 」 と 思わ 
れる か も 知れ ませ ん . レコ ー ド と テー プ は , ぃ 
っ た い ど こ が 本 質 的 に 異な っ て いる の で し ょ う 
か ? 

レコ ー ド の 曲 を 選ぶ に は レコ ー ド 針 を 望み の 
曲 の 前 に 置け ば いい の で す が , ここ で 重要 な こ 
と は 針 を 置く 場所 は 自由 だ と いう こと で す . だ 
か ら レ コー ド に 録音 され て いる 曲 は 最初 の 曲 か 
ら で も , 最後 の 曲 か ら で も 自由 に 聴く こと が で 
きま す . 

一 方 , カ セッ ト テー プ は 曲 を 選ぶ 時 に は その 
曲 が テ ー プ の 先頭 に な い 時 に は , PLAY ボタ ン 
の 前 に F.F. ボ タン を 押し て テー プ を 望み の 曲 ま 
で 進め る 手順 が 必要 不可 欠 で す . 

な ん と な くわ か っ て きた の で は な いで し ょ う 
か ? レコ ー ド の 曲 は レコ ー ド 上 の 内 側 に あろ 
う と 外側 に あろ う と 直接 アク セス で きる の で す . 
この よう な アク セス 方 式 を ラン ダム アク セス と 
言い ます . カセ ッ ト は 直接 アク セス で きる の は 


次 の 一 曲 だ け で , その 他 の 曲 を アク セス する た 
め に は 望み の 曲 ま で ガマ ン し て 聞く か , 途中 の 
曲 を と ば さ な け れ ば な り ま せん . この よう な ア 
クセ ス 方 式 を シー ケン シャ ル ア ク セス と 言い ま 
39 上 

と ころ で ラン ダム アク セス と シー ケン シャ ル 
アク セス の 説明 の た め に ここ まで は レコ ー ド と 
カセ ッ ト テ ー プ 中 の 音楽 で 話 を 進め て きま し た 
が , ディ スク の アク セス 方 法 も レコ ー ド と 殆ど 
同じ な の で す . た だ レコ ー ド で 針 を 動か す 作業 
に あたる ヘッ ド の 移動 は PC-8031 (8032) が 自 
動 的 に や り ま す が …. さら に カセ ッ ト 中 の 音楽 
は カセ ッ ト 中 の プロ グラ ム や デー タ と 考え る こ 
と が で きま す . も う 一 度 レ コー ド を ディ スク に , 
プロ グラ ム ・ デ ー タ 用 カセ ッ ト を 音楽 用 カセ ッ 
ト に , 音楽 を プロ グラ ム や デー タ に 読み か えな 
が ら ラ フラン ダム ア クセ ス と シー ケン シャ ル ア ク セ 
ス の 説明 を 読ん で みて くだ さい . 

ラン ダム アク セス は , 多数 の デー タ 中 か ら 任 
意 の デー タ を 選択 で きる アク セス 方 法 で , シー 
ケン シャ ル ア ク セス は , 多数 の デー タ は ある 特 
定 の 順 褒 で し か 選択 で き な い アク セス 方 法 で す . 
長 々 と ラン ダム アク セス に つい て 説明 し て き 
まし た が , ラン ダム アク セス 方 式 と シー ケン シ 
ャ ル ア ク セス 方 式 を 理解 すれ ば , 何故 に ラン ダ 
ム ア ク セス 方 式 が ディ スク の メリ ッ ト な の か も 
理解 し や すい は ず で す . 
ネ ラ ンダ ム ア ク セス 方 式 の メリ ッ ト 

ラン ダム アク セス 方 式 の メリ ッ ト は ラン ダム 
アク セス 方 式 と シー ケン シャ ル ア ク セス 方 式 の 
違い を 比較 すれ ば わか っ て きま す . 目的 の デー 
タ を 得る まで の 時 間 が 短い と いう こと で す . ラ 
ンダ ム ア ク セス 方 式 は 目的 と する デー タ を 直接 
選択 で きま す が , シー ケン シャ ル ア ク セス 方 式 
は 目的 の デー タ を 得る まで 順 々 に 読み 出す 動作 
が 必要 で すか ら , どちら が 速い か は 明らか で し 
2 

先 に ディ スク の メリ ッ ト は 速く て 大 容量 な こ 
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と だ と 書き まし だ が JE く 考 で の て くだ さい 
大 容量 と いう メリ ッ ト と 高速 と いう メリ ッ ト は 
ある 程度 背 反 する と は 思い ませ ん か ? た し か に 
カセ ッ ト の よう に シー ケン シャ ル ア ク セス 方 式 
の 記録 媒体 で は , 多数 の デー タ を 記録 すれ ば 最 
後に 記録 され た デー タ の アク セス に は 時 間 が か 
か り ま す が , ラン ダム アク セス 方 式 の 場合 に は 
デー タ を 多数 記録 し て も , それ ぞ れ の デー タ の 
アク セス に 要する 時 間 は ほとん ど 一 定 に な り ま 
す . すなわち , ラン ダム アク セス 方 式 は それ 自 
体 が メリ ッ ト と いう より も , 高速 で 大 容量 と い 
う 2 つの メリ ッ ト を 実現 する 手段 な の で す . 


ディ スク の ディ メリ ッ ト 
ここ まで は ディ スク の メリ ッ ト に つい て 書い 
て きた の で す が , 公正 を 期す た め に も ディ スク 
の ディ メリ ッ ト に つい て 書き ます . 下 に ディ ス 
ク の ディ メリ ッ ト を 項目 別に 書い て 、 それ に つ 
いて 説明 し ます . 心 を 落ち 着け て 読ん で くだ さ 
い 
・ ア クセ ス が 遅い / 
・ 記 憶 容 量 が 小さ ぃ / 
・ 複 雑 な ソフ トウ エア か 必要 / 
・ 弱 い / 
以上 の 4 つが ディ スク の ディ メリ ッ ト で す . 
メリ ッ ト の 項 に 書い た こと と 全く 逆 の 項目 も あ 
り ま す が , 別に 嘘 を 書い て いる わけ で は あり ま 
せん . その 理由 を 個々 の 項目 に つい て 説明 し ま 
じ ま の 。 
ディ メリ ッ ト そ の 1 アク セス が 遅い / 
ディ メリ ッ ト そ の 2 記憶 容量 が 小さ い / 
別に ディ スク の 容量 や 速度 が 毎日 変化 する わ 
け で は あり ませ ん . 物理 的 な 速度 や 容量 は メリ 
ッ ト の 項 に 書い た 通り な の で す が , それ で も 和 容 
量 や 速度 を 不満 に 思う 時 が あり ます . その 時 は 
ディ スク の 便利 さき に 慣れ きっ た 時 で すか ら , し 
ば らく ディ スク の 使用 を や め て , カセ ッ ト を 使 
っ て みる こと を 勧め ます . 実際 に ディ スク を 使 


い 人 慣れ て くる と 不便 さき が 気 に な っ て くる の で す . 
他 に も ディ スク を 趣味 で 使用 し て いる 時 に は 問 
題 が な く て も , 業務 用 へ の 使用 を 考え る と 少々 
物足りな いか も し れ ま せん が , これ は プロ グラ 
ム の 改善 で 使用 で きる と 思い ます . つ まり , デ 
ィ ス ク が 遅い と か 小 容量 と いう ディ メリ ッ ト は , 
ディ スク に 償 れ 切っ て 人 間 が 怠 性 に な っ た 時 か , 
本 来 ミ ニ フ ロ ッ ピ ー デ ィ ス ク の 性能 で は 不足 の 
分 野 で ディ スク シス テム を 使用 し た 時 に 生じ る 
の で す . 

ディ メリ ッ ト そ の 3 

複雑 な ソフ トウ エア か 必要 / 

PC-8001 の BASIC 言語 は , マイ クロ ソフ ト 
社 制作 の N-BASIC で す が , PC-8031 (8032) 
を 接続 する と N-BASIC に 種々 の ディ スク 用 の 
機能 が 付加 され て , Disk BASIC に 早 変 り し ま 
す . Disk BASIC 用 に 付加 され た 機能 は 2 章 で 
詳し く 説 明 し ます が と りあ え ず 2 章 の コマ ンド ・ 
スズ ステート メン ト 一 覧 表 を 見 て くだ さい 。 どう で 
す , 数 が 多い で し ょ う . コマ ンド や ステ ー ト メ 
ント の 数 が 多い と いう こと は , 使い や すい と も 
詩 え る の で す が , 使い こなす の が 大 変 と も 考え 
られ ます . 

さら に 最初 に 使う ディ スケ ッ ト は フォ ー マ ッ 
ト し な けれ ば な ら な いと か , ディ スク を 使用 す 
る 前 に 使用 宣言 , 終了 時 に は 終了 宣言 を し な け 
れ ば な り ま せん . 終了 定 言 を 忘れ る と , せっ か 
く 記録 し た デー タ を 壊し て し まい ます 。 プ ログ 
ラム 中 で ディ スク を 使用 する 時 に も , 使用 宣言 
と 終了 年 言 が 必要 で す . 

使用 官 言 や 終了 宣言 の 具体 的 な 方 法 は 第 2 章 
に , その 動作 の 詳し い 説 明 は 第 7 章 に 書き ます 
が , ここ で は な ぜ 使 用 宣言 や 終了 宣言 の よう な, 
~ お まじ し ない ?” が 必要 な の か を 簡単 に 説明 し ま 
生 s の 。 

ディ スク は 早く て 大 容量 と いう 2 つの メリ ッ 
ト を ラン ダム アク セス 方 式 と いう アク セス 方 で 
実現 し て いる こと は 前 に 書き まし た が , ラン ダ 
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ム ア ク セス 方 式 を 行う に は 目的 と する デー タ が 
デ ヂ ディス ケッ ト 上 の どこ に 収まっ て いる の か 知っ 
て いな けれ ば な り ま せん . シー ケン シャ ル ア ク 
セス 方 式 で は デー タ を 順番 に 調べ な が ら 目 的 の 
デー タ を 探せ ば よい の で す が , ラン ダム アク セ 
ス 方 式 で そん な こと を すれ ば , せっ か く の ラ ン 
ダム アク セス 方 式 の メリ ッ ト が 無 意 味 に な っ て 
| 関 ま 2K の 289 が 本 で 6G220 ス グット 上 の どこ に 
何 の デ ー タ が 記録 され て いる の か を 記録 し た 住 
所 録 の よう な も の を 作り , それ を ディ スケ ッ ト 
上 の 一 定 の 場所 に 記録 し て お きま す . この 住所 
録 は ディ スケ ッ ト 上 の デー タ を 読む 時 に は , デ 
ー タ の 住所 (記録 され て いる 場所 ) を 知る た め 
に 参照 され ます し , デー タ を 書き こむ 時 に は ど 
こ が 空 地 (記録 され て いな い 場 所 ) か を 知る た 
め に 参照 され る と 同時 に , 書き 込ん だ 後に は 変 
更 さ れ な けれ ば な り ま せん . つま り 住 所 録 は 最 
も ひん ば ぱん に 参照 され る 最も 重要 な 情報 で , こ 
れ が 破壊 され れ ば ディ スケ ッ ト 上 の デー タ は : 全 
て アク セス 不能 に な る の で す . 話 を 前 に も ど し 
て , ディ スク の 使用 宣言 と 終了 官 言 で す が , こ 
れ は PC-8001 が PC-8031 (8032) に 新しく 挿入 
され た ディ スケ ッ ト の 住所 録 を 知る 動作 と , 変 
更 さ れ た 住所 録 を 再び ディ スケ ッ ト へ 書き 込む 
動作 の 指定 と な る わけ で す . すなわち , 使用 定 
言 で は PC-8001 は 新しい ディ スケ ッ ト の 住所 録 
を 読み 出し ます . それ 以後 は その ディ スケ ッ ト 
へ の デー タ の 読み 出し や 書き 込み は , その 住所 
録 を 参照 し な が ら 行 うわ け で す . そし て 終了 宣 
言 で は ,、 ディ スケ ッ ト へ の 読み 出し や 書き 込み 
を 行っ た 後 の 新しい 住所 録 を ディ スケ ッ ト へ 書 
き 込 む の で す . 

ディ スク シス テム は ソフ トウ ェ ア が 複雑 に な 
り , 利用 する の に も ある 程度 の 注意 が 必要 と い 
う 理 由 も , ディ スク に 対す る アク セス の 複雑 さ 
か ら 来 る も の な の で す が , 高速 で 大 容量 と いう 
メリ ッ ト を 確保 する た め に 必要 な 処理 で すし , 
実際 に は ほとん どの 処理 は Disk BASIC が 行い 


ます か ら , 使用 する 時 に は マニ ュ ア ル や この 本 
を よく 読ん で , 基本 的 な 注意 を 忘れ な いよ うに 
で SSIU85 

ディ メリ ッ ト そ の 4 弱い 

さて “弱い” と は 一 体 何 が 弱い の で し ょ う . 
答え は 2 つ あ り ま す . 

1) ハ ー ド ウェ ア 的 に 弱い 632 の 
ッ ト 本 体 が 物理 的 に 弱い と いう こと で す . ディ 
スケ ッ ト 本 体 は ソノ シー ト よ り 薄 い 円 板 で , 不 
織 布 と 厚紙 で カバ ー さ れ て いる だ け で すか ら , 
保存 に 注意 し な けれ ば な り ま せん . 当然 の こと 
で す が , 曲げ た り 記 録 面 に 手 で 触れ る こと も 避 
け な け れ ば な り ま せん . また 磁石 等 を 近づけ る 
と せっ か くく 記録 し た デー タ が 破壊 され て し まい 
=3S2 攻 

デ ヂ ディス ケッ ト は で きる だ け 専 用 の 本 立て の よ 
うな も の に 保管 すれ ば よい で し ょ う . 

2) ソ フト ウェ ア 的 に 弱い これ は 先 に 書い 
た ディ スケ ッ ト の 住所 録 が 破壊 され た 時 に お こ 
り , ディ スク 中 の デー タ 全 部 を 失っ て し まい ま 
す . ディ スク の 使用 宣言 と 終了 宣言 の 指定 を 誤 
っ た 時 に 住所 録 が 破壊 され ます . 住所 録 が 壊れ 
る と 記録 きれ て いる ディ スク へ の アク セス が 不 
可能 に な り ま すか ら , も うそ の ディ スケ ッ ト は 
使い も の に な り ま せん . た だ , ソフ トウ ェ ア 的 
に 壊れ た ディ スケ ッ ト は , 記録 され て いる プロ 
グラ ム や デー タ が アク セス で き な い だ け で すか 
らち 。 アス ネス ケッ ド を も る もう 上 度 フ ュー マッ ト し 志 
せ ば , プロ グラ ム や デー タ は 消え 去り ます が , 
ディ スケ ッ ト は 使用 で きま す . 


1 紀 


E 導 せま さか い 
間 い あや ら 


第 0 章 で は ディ スク が どん な 働き を する か , 
どん な メリ ッ ト や ディ メリ ッ ト を 持っ て いる か 
と VO の RS の 考 ま UP 7 た の 5 ま の の 5 と 2 イ 
スク は カセ ッ ト テ ー プ より も 速く て 大 容量 な デ 
ー タ の 記憶 装置 で ある と いう こと で し た . さ て , 
デー タ の 記憶 装置 と いえ ば カセ ッ ト や ディ スク 
だ け で は あり ませ ん . 大 型 計算 機 と も な れ ば さ 
ら に 高 性 能 な 記憶 装置 を 用 いて いま す . 第 1 章 
で は , 最初 に 計算 機 の 記憶 装置 に つい て 説明 し 
て , フロッピー ディスク が 記憶 装置 と し て どん 
な 位置 に ある か を 知っ て も らい ます . それ か ら 
PC-8031 (8032) が PC-8001 の 記憶 装置 と し て , 
デー タ の 記録 を どの よう に 行う か を 説明 し た い 
と 思い ます . 


1. 1 計算 機 の 記憶 装置 の 構成 


計算 機 の 記憶 装置 の 構成 を 箇 単 に 図 で し て 
お きま す . 


] 


1 己 


ディ スク シス テム の 基礎 


外部 メモ リ 


計算 機 本 体 
(CPU は 計算 機 の 頭脳 に あたる 部 分 で 記憶 装 
置 で は あり ませ ん .) 


1. 1. 1 内 部 記憶 装置 


内 部 メモ リ (記憶 装置 ) は CPU が 直接 アク 
セス で きる ほど 高速 な 記憶 装置 で す 、 読者 の 方 
も 今 ま で に RAM と いう 言葉 を 一 度 は 聴い た 
と が ある と 思い ます が , RAM も ROM も 計算 
機 の 内 部 記憶 装置 と し て 使用 され る メモ リ で す . 
PC-8001 の RAM は 図 の よう な 小型 L S 【 メ モ 
リ を , 16K シ ステ ム で 8 個 、32K シス テム で 16 


ー 
ヽ ー 


個 使用 し て いま す . 


1. 1. 2 外部 記憶 装置 

も う 一 度 計算 機 の 記憶 装置 の 構成 図 を 見 て 下 
さい . 外部 メモ リ (外部 記憶 装置 ) は 計算 機 本 
体 の 枠 の 外 に 描か れ て いま すね . これ が 外部 記 
境 装置 と 言う 理由 で す . ディ スク や カセ ッ ト も 
外部 記憶 装置 の うち の 一 つ で す が , 外部 記憶 装 
置 に つい て の 説明 に は いる 前 に , な ぜ 外 部 記憶 
装置 が 必要 な の か 考え て みて 下さ い . それ に は 
た めし に 1 ヶ月 間 カ セッ ト や ディ スク な ど 一 切 
の 外部 記憶 装置 を 使用 し な いで PC-8001 を 使っ 
K9CZCNSKcGkJ 還 (SS り 有 eS SKK 
も 外部 記憶 装置 が 必要 な こと は も う 御 存 知 で す 
ね . 

マイ コン で 外部 記憶 装置 と いえ ば カセ ッ ト と 
ミニ フロ ッ ピ ー デ ィ ス ク が 一 般 的 で す が , 大 形 
計算 機 で は さら に 高 性 能 な 外部 記憶 装置 が 使用 
され て いま す . その 種類 は いろ いろ で す が , カ 
セッ ト や ディ スク の よう を な 磁気 を 利用 し た 磁気 
記憶 装置 に 限っ て も 磁気 テー プ , 磁気 ディ スク 
パッ ク ,。 磁気 ドラ ム 等 が あり ます . これ ら の 詳 
し い 構 造 は ここ で は 書き ませ ん が , 磁気 テー プ 
や 磁気 ディ スク パッ ク と 言っ て も , カセ ッ ト や 
フロ ッ ピ ー デ ィ ス ク と は 直 い ます か ら 間 違え な 
いよ うに し て 下さ い . 読者 の 方 は PC-8031 の 価 
格 を 安い と 思い ます か 7? 大抵 の 人 は 高い と 思 
う で し ょ う . し か し それ で も 磁気 テー プ , 磁気 
ドラ ム , 磁気 ディ スク パッ ク に 比較 する と 割安 
な の で す . 


1 


_ 速度 と 容量 の 比較 


過半 


容量 と 速度 の 関係 の グラ フ を 見 て 下さ い . 高 
速 で 小 容量 な 記憶 装置 と し て IC メ モリ が あり , 
低速 で 大 容量 な 記憶 装置 と し て 磁気 テー プ が あ 
る こと が わか る と 思い ます . この グラ フ 中 で 価 
格 は どう 扱わ れ て いる か と いう と, 先 に 書い た 
よう に 高速 で 大 容量 に な る に 従っ て 高価 に な り 
ます か ら , グラ フ の 原点 か ら 離 れる ほど 高価 に 
な る わけ で す . その 意味 で フロ ッ ピ ー デ ィ ス ク 
シス テム は , 磁気 テー プ , 磁気 ディ スク フッ パッ ク , 
磁気 ドラ ム ほ ど 容 量 も スピ ー ド も あり ませ ん が 
価格 が 安い の で 我々 アマ チュ ア と か スモ ー ル ビ 
ジネス 用 に 使用 で きる わけ で す . 

実際 の と ころ マイ コン に フロ ッ ピ ー デ ィ ス ク 
以上 の 高 性 能 な 外部 記憶 装置 を つけ て みて も マ 
イコ ン の 性 能 速 度 の 点 で 効果 的 で は な いこ と が 
多い と 思い ます . 

※*※ も ちろ ん マイ コン の 外部 記憶 装置 と し 
て は フロ ッ ピ ー デ ヂ ディスク が 一 番 良 いと 決定 され 
た わけ で は あり ませ ん . 選択 に は コン ピュ ー タ 
の 性 能 や , 外部 記憶 装置 の 性 能 の 他 に , シス テ 
ム を 使う 目的 も 関係 し て きま す . た と えば スモ 
ー ル ビジ ネス や 科学 技術 用 の デー タ 処 理 で は , 
フロ ッ ピ ー デ ヂ ディス ク で は 容量 や 速度 の 点 で 不足 
に な る こと が ある で し ょ う . そう いう 時 は も っ 
と 高 性 能 な 外部 記憶 装置 を 者 て みる 必要 が ある 
か も し れ ま せん . **※ 


中 の 12: ジン 5 ソプラーニ ーー 


ディ スク は デー タ を 記録 する も の で す が , そ 
の デー タ を 人 間 が 扱う に は どう すれ ば よい で し 
ょ うか . 例え ば カセ ッ ト に プロ グラ ム を 保管 す 
る 時 の こと を 考え て み ま し ょ う . 


プロ グラ ム “ASCII7 を カセ ッ ト に セー ブ す る 

に は 
csave “ASCII? 

と ちこ こみ まし た. 

ロー ド す る に は 
cload “ASCII? 

ち み ま ( あ た だ た 。 

この 動作 の 中 で 我々 人 間 は , プロ グラ ム と いう 


まり Gt の ロク クル ペ だ 


デー タ を ASCII と いう 名 前 で 扱っ て いた わけ で 


す . ディ スク の 場合 も 同様 で 記録 する デー タ は 
名 前 で 扱う こと が で きま す . 

デー タ に 名 前 を つけ る と いう こと を 図 に 書け 
ば 


と いう 扱い を し て いる こと に な り ま す が , こ 
こ で デー タ に 名 前 を つけ て 扱う の で は な く デ ー 
タ を 直接 指す 概念 と し て , ファ イル と いう 言葉 
を 説明 し ます . 

ファ イル と は 「 意 味 を も っ た デー タ の 集合 体 」 
と 言え ます . 別に コン ピュ ー タ 用 語 に 限ら ず 身 
近 な も の で 考え て みて くだ さい . 例え ば ノー ト 
を まとめ て ファ イル する と 言い ます が , ノー ト 
は 私 達 に と っ て 意味 を も っ た デー タ で すか ら そ 
れ を 整理 し た も の は ファ イル と 言え る わけ で す . 
要 は 人 間 が デー タ を 扱う 時 の 概念 と し て ファ イ 


| を 


ル と いう 言葉 を 用 いる こと を 知っ て お いて 下さ 
い 

ディ スク 上 に デー タ を 記録 する に は , ファ イ 
ル 単 位 で 記録 し ます . 例え ば 一 本 の プロ グラ ム 
を ディ スク 上 に 記録 する と いう こと は ,。 ディ ス 
ク 上 に 一 つの ファ イル を 作る こと に な る わけ で 
す . 先 に ディ スク 上 に デー タ を 記録 する 時 に は 
デー タ に 名 前 を つけ て 取り 扱う こと を 書き まし 
た が , 名 前 を つけ る と いう こと は , ファ イル に 
名 前 を つけ る と いう こと で , この 名 前 を ファ イ 
ル 名 と いい ます . 

実際 の 動作 で 説明 し まし ょ う . ディ スク に プ 
ログ ラム を 記録 する コマ ンド は save で す が 


save ASCII7 


と キー を つこ と は, プロ グラ ム を ディ ズ ク に 
記録 し て ファ イル を 作る , その ファ イル に は ASCII 
と いう ファ イル 名 を つけ る こと を 意味 し て いる 
わけ で す . 上 の 例 は ディ スク に プロ グラ ム を 記 
録 す る 場合 で す が , カセ モッ ト に プロ グラ ム を 記 
録 す る 時 に も 同様 の 解 収 が で きま す . すなわち 


csave “ASCII? 


と キー を 寺 つ こと は ブログ ラム を カセ ッ ト テ ー 
プ 上 に 記録 し て ファ イル を 作り , その ファ イル 
に は ASCII と いう ファ イル 名 を 付け て いる わけ 
あお 

カセ ッ ト テ ー プ し か 使用 し な か っ た 時 に も フ 
ァイル と いう 言葉 こそ 用 いま せん で し た が , フ 
ァイル の 考え 方 は 用 いて いた わけ で す . 

ファ イル の 概念 を 理解 で きた で し ょ うか ? フ 
ァイル は デー タ の 論理 的 な 取り 扱い の 単位 の よ 
うな も の で すか ら , 無理 に 一 つの 定義 を あて は 
め て 考え な いで 言葉 に 慣れ る よう に し て 下さ い . 
この 本 を 読み 進む う ち に ファ イル と い う 言 葉 は 


aa 


山 ほ ど 出 て きま すか ら , 自然 と 慣れ る と 思い ま 
すず す 。 こ の 本 で は ここ か は 還 プ パイ スク は ファ イ 
ル を 保管 する も の と し て 考え ます . 

1, 3 ファ イル の 形式 


コン ピラ ー タ が ディ スク に デニ タク を 書き 込ん 
だ り デ ィ ス ク か ら デ ー タ を 読み 出し た りす る こ 
と は 上 先 に 書き まし た 』 そそ の デー ニタ を ファ 
イル と 呼ぶ と と も 書き まし た 。 さ で 次 に 書く こ 
と は , ファ イル の 中 味 に つい て で す . 


ここ まで の 例 で は ディ スク に 制作 し た ファ イ 
ル は プロ グラ ム だ け で し た 。 し か し , カセ ッ ト 
の こと を 思い 出し て 下さ い . カセ ッ ト 上 に 作ら 
れ た ファ イル は プロ グラ ム だ け だ っ た で し ょ う 
か ? プロ グラ ム の 他 に デー タ も 記録 で きま し 
276 


PRINT #-1 


を 使っ て カセ ッ ト 上 に デー タ を 記録 し た こと を 
思い 出し て 下さ い . プロ グラ ム で は な い デ ー タ 
を カセ ッ ト 上 に 記録 し て も その デー タ は ファ イ 
ル と 呼べ ます か ら , この こと は カセ ッ ト 上 に デ 
ー タ の ファ イル を 作 う た こと に に な りり ます ディ 
スク に プロ グラ ム 以 外 の デー タ は 記録 で きる で 
し ょ うか ? 当然 で きま す . 非力 な カセ ッ ト で 
も で きる の で す . ディ スク が で き な い は ず は あぁ あ 
り ま せん . 

ディ スク 上 へ の デー タ の 書込み の 具体 的 な 話 
は 第 2 章 で し ます . と りあ え ず ここ まで の 話 で , 
ファ イル に は プロ グラ ム を 書 込 ん だ も の と , デ 
ー タ を 書 込 ん だ も の の , 2 種類 ある こと が 理解 
で きた で し ょ う . ブロ グラ ム を 書 込 ん だ ファ イ 
ル を プロ グラ ム フ ァ イル , デー タ を 書 込 ん だ フ 
ァイル を デー タフ ァイル と 呼び ます . ファ イル 
は プロ グラ ム フ ァ イル と デー タフ ァイル を ま と 
め た 呼び 方 な わけ で す . 


1 日 


二 の 1 
/ 
人 ジウ 4 ツテ イル 
1 琴 還 3 軸 間 上 ジィ ログ パラ ルミ ジア ァイル 


プロ グラ ム フ ァ イル と は , プロ グラ ム が 保管 
され て いる ファ イル で すか ら 作 る の は 簡単 で す . 
ディ スク へ プロ グラ ム を 記録 する た め に は , 

SaVe 

と いう 便利 な コマ ンド が あり ます か ら , 
ASCII と いう プロ グラ ム フ ァ イル を 作る に は 

save “ASCII ヶ 
ぐい いわ け で お が, も う 1 つ ,。 タ イプ の 異な る 
Save コマ ンド が あり ます . 

save “ASCII^ a 

が それ で す . コマ ンド の 最後 に ,a を つけ た だ け 
で す . ,a を つけ な い save を セー ブ コ マン ド と 
言い つけ た コマ ンド を アス キー セー ブ コ マン 
ド と 言い ます . セー プ と アス キー セー プ は ど ち 
ら も 外見 的 な 機能 は 同じ で ,。 プ ログ ラム を ディ 
スク に セー ブ す る こと で す . も ちろ ん ロー ド す 
る 時 に は , 1oad コマ ンド で ロー ドド でき ます . で 
は セー プア と アス キー セー プ は どこ が 違う の で し 
ょ うか . こ の 違い を 説明 する た め に は BASIC の 
中 間 言 語 構 造 に つい て 知っ て も ら わ ね ば な り ま 
せん . この へ ん の 詳し ぃ 話 は 第 一 巻 の 6・2 
BASIC の キー ワー ド の 項 (121 ペ ー ジ ) に 書い 
て あり ます が , ここ で も 人 簡単 に 説明 し ます . 


プロ グラ ム は 最初 は 人 間 の 手 で キー ボー ド か 
ら 入 力 さ れる わけ で す が , N-BASIC の 文法 を 守 
っ て 入力 され た プロ グラ ム は 即座 に N-BASIC 
が 解読 し て , 内 部 表現 に 変換 し て し まい ます . 
従っ て メモ リ 内 の プロ グラ ム メ 格 納 領 域 に 格納 さ 
れ て いる プロ グラ ム は 人 間 が 手 で 入力 し た 形 と 
は 異な っ て いる わけ で す . 

その 様子 を 図示 する と 


2 2 内 
プ 間 プ 部 
ロ が A ロ 表 
グ 書 S グ 現 
ママ いし) | ラ の 
MC C 3 


の よう に な る の で し ょ うか . 
BASIC が わざ わざ プロ グラ ム 形 を 変え て し ま 
う の は 

1) 人 間 が 書い た プロ グラ ム を 短い 形 に 変換 し 
て メモ リ に 格納 し て し まい , メモ リ を 効率 
良く 使用 する . 

2) プ ログ ラム を コン ピュ ー タ が 解釈 し や すい 
形 に 変換 し て し まい , 実行 する 時 の 速度 を 
向上 する . 

と いう 2 つの 理由 が ある の で す が , 逆 に 一 度 メ 
モリ に 納め て し まっ た プロ グラ ム を 見 直す 時 に 
は , 内 部 表現 を 人 間 が 書い た プロ グラ ム に 逆 変 
換 し な けれ ば な り ま せん . 例え ば 

]ist 

と 打つ こと は , 内 部 表現 形式 の プロ グラ ム を 人 
間 が 書い た 表現 に し て 表示 する こと に な る わけ 
Gi9 


と りあ え ぇ ず BASIC の プロ グラ ム に は 表現 上 
で 2 種類 ある こと を 理解 し て 下さ い . 

さて 話 を また セー プ と ,a を つけ た セー プ ブ に 戻 
し ます . 2 つの セー ブ は 外見 的 な 機能 は 同じ と 
いう こと は 先 に 書き まし た が , も う 少 し ヒン ト 
を あげ ます か ら 違 い を 考え て くだ さい . 

2 つの セー プ は プロ グラ ム を 異 っ た タイ プ で 
セー プ す る の で す . 

2 で 937 導 だ いた だ ゆめ 察 り が つい た で TI2 
save ASCII7 

の コマ ンド で は ASCIIL と いう プロ グラ ム は 一 度 
BASIC で 変換 され た 内 部 表現 の 形 で ディ スク に 
記録 され ます 。 


save “ASCIIY ,a 

の コマ ンド で は ASCII と いう プロ グラ ム が , 
人 間 が 書い た プロ グラ ム の 形 で ディ スク に 記 
録 き まれ ま す . 人 間 が 書い た プロ グラ ム は コン 
ピュ ー タ で は アス キー コー ド の 列 と し て 受け 
取ら れ ま すか ら , この ,a を つけ て セー プ し た 
プロ グラ ム フ ァ イル は アス キー 形式 の プロ グ 
ラム ファ イル と 呼ば れ ま す . 


先 に ファ イル に は , プロ グラ ム フ ァ イル と デ 
ー タ ファ イル が ある こと を 書き まし た . そし て 
プロ グラ ム フ ァ イル は アス キー 形式 と アス キー 
形式 で は な い フ ァイル が ある こと を 書き まし た . 
ここ まで の 段階 で ファ イル を 分 類する と 


30 に アス キー 形式 と 
0 

と 書け ます . 

さて , プロ グラ ム フ ァ イル は 内 容 が プロ グラ 
ム で すか ら , ロー ド し て 実行 で きる 形 で 記録 さ 
れ て いる な ら , 記録 きれ て る 形 は 問題 で は な い 
は ず で す . 先 に アス キー 形式 以外 の プロ グラ ム 
(内 部 表現 に 変換 され た プロ グラ ム ) は , アス 
キー 形式 の プロ グラ ム よ り 短 く 変 換 さ れ て いる 
こと を 書き まし た . この 特長 は ディ スク 上 に 記 
録 さ れ て も 受け 継が れ ま すか ら , 同一 アロ グラ 
ム を ファ イル し た 場合 ,、 アス キー 形式 の プロ グ 


ラム ファ イル は 内 部 表現 形式 の プロ グラ ム フ ァ 
イル より 長く な り ま す . 従っ て 。 デ ィ ス ク の 効 
果 的 活用 と いう 意味 で は 内 部 表現 形式 の ファ イ 
ル の ほう が 優れ て いる わけ で す . し か し アス キ 
ー 形 式 の ファ イル は 人 間 が キー ボー ド か ら 入 力 
し た の と 同じ 形 を し て いま すか ら , ディ スク 上 
の アス キー 形式 の ファ イル を 読む 時 , キー ボー 
ド か ら 入力 す る こと と 同じ よう に 扱う こと が で 
きま す . 

例え ば 行 番 行 1000-2000 の プロ グラ ム を アス 
キー 形式 の ファ イル に し て お いて , キー ボー ド 
か ら , 行 番号 0 990 の プロ グラ ム を 書い た 時 , 
merge コマ ンド を 使っ て メモ リ 中 の 行 番号 0 
ー2000 の プロ グラ ム に する よう な 芸当 も で きる 
わけ で す . 


Prog ! 


手 で 入力 


Progl 十 Proa2 


N-BASIC 


手 で 入力 


ディ スク 上 の ファ イル 


10002000| 
ディ スク 上 の アス キー 
形式 の ファ イル 


IO 2 ーー ジン 2 ルウ 

PC-8001 の 外部 記憶 装置 に カセ ッ ト し か 使用 
し な か っ た 時 に も ,。 デー タフ ァイル を カセ ッ ト 
テー プ 上 に 作っ て いた わけ で す が , 読者 の 方 で , 
PC-8001 を 持っ て お られ る 方 の うち 一 体 何人 ぐら 
い が , カセ ッ ト を 使っ た デー タフ ァイル を 使っ 
て みた で し ょ うか . PC 抽 の 7・5 実践 ! プロ 
グラ ム の 開発 の 項 (140 ペ ー ジ ) で 書い た 名 徳 管 
理 プ ログ ラム は , カセ ッ ト 上 に デー タフ ァイル 
を 作っ て いる よい 例 で す が , 実際 に あの ブログ 
ラム を 動か し て みた 人 な ら 知 っ て いる で し ょ う 
が 大 き な 欠 点 が あり ます . デー タ を カセ ッ ト 
へ 書く 時 と カセ ッ ト か ら 読 む 時 に 長い 長い 時 間 
が か か る の で す . 変 数 や スト リン グ 変 数 を 2 ~ 3 


ど ロ 


個 記 録 す る な ら , カセ ッ ト で も アッ と 言う 間 に 
終る の で す が , 少し デー タ の 量 が 多く な る と カ 
セッ ト で は 時 間 が か か っ て 使い づら く な り ま す . 
し か し 速度 , 容量 と も カセ ッ ト よ り 強 力 な ディ 
スク な ら , か な り 広 い 用 途 に 応用 で きる で し ょ 
8 
実際 の と ころ , ディ スク を 導入 する 最大 の メ 
リッ ト は , デー タ の 扱い が 強力 に な る と いう こ 
と な の で す . 読者 の 方 も , ディ スク を 購入 し た 
上 暁 に は ,。 プ ログ ラム ファ イル の ロー ド や セー プ 
が 高速 に で きる こと を 喜ぶ だ け で は な く , ディ 
スク の デー タ 処 理 能 力 を 生か す プ ログ ラム に 挑 
戦 し て 下さ い 。 それ が ディ スク シス テム を 本 当 
に 活用 する こと な の で すか ら . 

さて , デ ー タ ファ イル の 説明 に 入り まし ょ う . 
プロ グラ ム フ ァ イル は , その 記録 方 式 の 違い で 
2 つの タイ プ に 分 類 さ れ ま し た . 


当 アス キー 形式 

人 人 20 ュ 

上 の よう に , アス キー タイ プ と 内 部 表現 タイ 
ZI| 表 た 9 二 Za ロ クジ アテ ゴイ ル は デー タ の 記 
録 形式 で 二 つ に 分 類 し まし た が , デー タフ ァ イ 
ル は 異な っ た 意味 で 2 つの タイ プ に 分 類 き され ま 
す . シー ケン シャ ルフ ァイル と ラン ダム ファ イ 
ル で す . 

シー ケン シャ ル と ラン ダム と いう 言葉 を 覚え 
て いま すか 7? 第 0 章 の ディ スク の メリ ッ ト そ 
の 3 で , シー ケン シャ ル ア ク セス と ラン ダム ア 
クセ ス に つい て 説明 し まし た . シー ケン シャ ル 
アク セス と ラン ダム アク セス は , 記憶 装置 の ア 
グセ 方 gd 還 だ 還 し 忘 槍 で いる な ら ,。 も う 
一 度 第 0 章 の ディ スク の メリ ッ ト そ の 3 を 読み 
直し て 下さ い . この アク セス 法 の 違い が , その 
まま 2 つの デー タフ ァイル の 型 の 違い に 通じ て 
いま すか ら . 

で ⑤ 265 ジー ク ョ ンジ こつ カ 2452 ン 全 2 議 4 ンス ンク 8 


ファ イル に つい て 詳し く 説 明 す る 前 に , デー タ 
ファ イル に デー タ を 読み 書き する 単位 と し て , 
レコ ー ド と いう 言葉 が 用 いら れ ま すか ら , レコ 
ー ド に つい て 説明 し ます . 

レコ ー ド の 定義 は 次 の よう に な り ま す . 

「 レ コー ド と は , 一 度 に ファ イル に 入出 力 され 
る デー タ の 組 で ある .」 

レコ ー ド と , ファ イル の 関係 に つい て 注意 し 
て 下さ いぶ 。 レ コー ド は , ファ イル 内 の デー タダ で , 


入出 力 が 1 回 で 行わ れる も の で す . 
従っ て 

ファ イル は レコ ー ド の 集合 体 
レコ ー ド は デー タ の 集合 体 

と な る わけ で す . 

その 様子 を 図示 する と , 


(の) gOSGI し 3 
具体 的 に , カセ ッ ト に デー タフ ァイル を 作る 
時 の こと を 考え て み ま し ょ う . 


print # キ 1,A 


と キー ボー ド か ら 打 つこ と は , カセ ッ ト テ ー 
プ に 変数 A の 値 を 記録 する こと で す が , テー プ 
記 に は 


上 EEEECIEBEW 


レ ョ jk 
の 形 で 記録 され て いま す . 変数 A の 値 は 1 度 
に ファ イル に 書 込 ま れ ま すか ら , これ を レコ ー 
ド と 言う わけ で す . CR/LF は キャ リッ ジリ タ 
ー ン ライ ン フ ィ ー ド の コー ド で , レコ ー ド の 区 
切り に 使わ れ て いま す , 
変数 が 2 個 の 場合 は 


print #1. AB 


ら 1 


で す が , この 時 テー プ 上 の 記録 の 形 は 


レコ トー ドド 


と な り ま す . CR/LF は 変数 A,、B の 湊 に 記 
録 さ きれ て いま すか ら , 変数 A, B の 値 が 組 に な 
っ て 1 つの レコ ー ド を 構成 する こと が わか る で 
じ 才 うつ VSNG(e0 も 520W つ 

print #-1、 AB 
print #-1、C, D 


を 実行 し た 時 の テー プ 上 の 形 は 


OPTIERZOEST 


レレ ョ トド レコ ー ド 


と な ! り まま ④ 財 レコ ー ド が の つの 涙 が りほ | 介 だ ね 

3 つの 例 で , カセ ッ ト の 場合 は レコ ー ド が ど 
の よう に 作ら れる か わか る と 思い ます . 

まず 


print #-1、 A, B 


で は , カセ ッ ト に , 変数 A の 値 と B の 値 を 
1 度 に 書込み ます . し た が っ て , 2 つの 値 の 組 
で 1 つの レコ ー ド と な る わけ で す . 

次 に 


print #-1 A, B 
print 持 1 C, D 


で は , 最初 に 変数 A の 値 と B の 値 の 組 を 1 
度 に 書 込 ん で , 次 に 変数 C の 値 と D の 値 の 組 
を 1 度 に 書 込 ま れる わけ で す . 書込み 動作 は 2 
回 で すか ら 2 つの レコ ー ド と な り ま す . 

要 は 一 回 の PRINT#-1 で 書 込 む デー タ の 


組 が レコ ー ド と な る わけ で す . 

これ が カセ ッ ト 上 に デー タフ ァイル を 使う 場 
合 の レコ ー ド で す が , 注目 し て も らい た い の は 
カセ ッ ト の レコ ー ド で は , レコ ー ド の 長 さ が 変 
わる と いう こと で す . 例 で は 変数 の 組 が 2 個 ま 
で で し た が , 3 個 で も , 4 個 で も 組 に する こと 
が で きま すし ,255 個 の 文字 列 を 値 に 持つ 文字 変 
数 か も しれ ませ ん . と に か く デ ー タ の 組 が 大 き 
く を な れ ば , レコ ー ド の 長 さ も 長く な る わけ で す . 
カセ ッ ト に デー タフ ァイル を 作る 時 の , レコ 
ー ド の 意味 を 理解 で きた で し ょ うか 。 レ コー ド 
の 長 さ が 変化 する こと に 注目 し て ほし いと 書い 
た の は 理由 が あり まし て , 実は も う 1 つ , レコ 
ー ド の 長 さ の 変化 し な い タ イプ の レコ ー ド が あぁ 
る の で す . 逆 に 言え ば, この タイ プ の レコ ー ド 
は 長 さ が 固定 され て いる わけ で す . 

7 た cy の I2 ラ コー ニョ トド 2Ci 車 連 還 2 に 嗣 回 守 き 0 
た 長 さ の レコ ー ド に , 変数 A と B の 値 を 記録 
し た 様子 を 図示 する と , 


区 紀 に コ ド 

と いう 具合 で し ょ う . この 場合 は カセ ッ ト の 
例 の よう に , レコ ー ド の 終り を 示す CR ノ LEF の 
コー ド は 必要 あり ませ ん ね . 

レコ ー ド の 長 さ が 固定 され て いる 場合 , レコ 
ー ド に 記録 する デー タ の 量 が レコ ー ド の 長 さ に 
満た な いと , レコ ー ド 内 に 余り が で きま す 、. 従 
っ て ファ イル の 長 さ の 割 に は , デー タ の 量 は 少 
いと いう こと に な り ま す . 

し か し , この 固定 長 の レコ ー ド 方 式 に も 拾 て 
難い 魅力 が あり ます . この こと は ,。 この 後 シ ー 
ケン シャ ルフ ァイル と デー タフ ァイル の 説明 を 
する 時 に 詳し く 書 きま す が , と に か く 今 は 可変 
長 の レコ ー ド と 固定 長 の レコ ー ド が あり , カセ 
ッ ト 上 の ファ イル を 使用 する 時 に は , 可変 長 の 
レコ ー ド 方 式 が 使用 さき され て いる こと を 覚え て お 
いて 下さ い . 


1 3 2 . 1 シー ケン シャ ルフ ァイル 
デー タラ ァイル は , シー ケン シャ ルフ ァイル 
と ラン ダム ファ イル に 分 類 さ れる と 先 に 書き ま 
し た 。 まず シー ケン シャ ルフ ァイル に つい て 説 
明 し まし ょ う . 
シー ケン シャ ルフ ァイル を , 簡単 に 説明 する 
と ,「 書 いた 順序 で し か 読め な を い フ ァイル 」 
に 2 Or ぐだ 3 だ 3 
上 の 説明 の 「 書 いた 順 褒 で し か 読め な い 」 の 
部 分 に 注目 し て 下さ い . こん な 説明 を どこ か で 
読ん だ と 思い ませ ん か 7? 実は 第 0 章 の , シー 
ケン シャ ル ア ク セス 方 式 の 説明 の 所 で , これ と 
似 た よう な 説明 を し た の で す . 
シー ケン シャ ル ア ク セス 方 式 は 
「 特 定 の 順 庄 で し か , デー タ を アク セス で 
き な い アク セス 法 」 
il 叶 だ 7 
どう で す ? な ん と な く 似 て いる と 思い ませ ん 
か . 似 て いる の も 当然 で , 実は シー ケン シャ ル 
ファ イル と いう 呼 名 は , ファ イル 内 の デー タ を 
アク セス する 方 法 が .。 シー ケン シャ ル ア ク セス 
方 式 で ある 点 に 由来 し て いる の で す . 
シーク シシ ャ ルフ ァイル を ,。 も う 少 し 詳し く 
説明 し まし ょ う . 
ファ イル 中 に デー タ が 記録 きれ て いる 様子 を 
図示 する と , 下 の 様 に な り ま す . 


この 図 は , N 個 の デー タ て 構成 され た ファ イ 
ル を 示し て いま す . 

さて , 図 の よう な ファ イル か ら デ ー タ を 読む 
時 の こと を 考え て み ま し ょ う . シー ケン シャ ル 
ファ イル で は , デー タ は 書 込 ん だ 順 詳 で し か 読 
め ま せ ん か ら , 


1 回 目 の 読み 取り で デー タ 1 の 値 が 読め る . 


どら 


2 回 目 の 読 み 取り で デー タ 2 の 値 が 読め る . 


N 回 目 の 読み 取り で デー タ N の 値 が 読め 
る . 

N 二 1 回 目 の 読み 取 り で は , デー タ が な い の 
で も う 読 め な い . 


と いう こと に な り ま す . これ 以外 の 読み 取り 
は で きま せん . 従っ て , N 個 目 の デー タ だ け 読 
みた い 場 合 で も , N - 1 個 の デー タ を 読み と ば す 

空 読み する ) 必要 が ある わけ で す ., 

*※*※ シ ー ケ ン シ ャ ルフ ァイル の 場合 、 デ ー タ 
を アク セス する 方 法 は , シー ケン シャ ル 
アク セス 方 式 で ある と いう こと が 理解 で 
きた で し ょ う . * ま *※※ 


も う 少 し 具体 的 に 話し まし ょ う . 具体 的 に と 
いっ で も ディ スク の 話 で は な く , カセ ッ ト の 話 
で す . シー ケン シャ ルフ ァイル を ディ スク で 扱 
う 具 体 的 な 説明 は 第 2 章 で し ます . ここ で は で 
きる だ け シ ー ケ ン シ ャ ルフ ァイル に つい て 正確 
に 理解 する よう に し て 下さ い . 

ここ まで シー ケン シャ ルフ ァイル の 説明 を 読 
ん だ 人 は , カセ ッ ト 上 の ファ イル は シー ケン シ 
ャ ルフ ァイル で ある と いう こと を , すぐ 理解 で 
きる で し ょ う . カセ ッ ト に ファ イル を 作る 時 の 
ステ ー ト メン ト は 


print #1, < 変数 の 組 > 


読む 時 の ステ ー ト メン ト は 
input #-1, < 変数 の 組 > 
i(@2876b 

print #1, を 実行 する 時 の , カ セッ ト テ ー 
プ へ 記録 する 様子 は レコ ー ド の 説明 の 所 で 書い 
た の で , 今度 は input #1, の 様子 を 図 に し て 
Es | し の 。 


で | 


こん な 具合 で す . 


1 回 の input #-1, で 読む 
デー タ の 組 を , レコ ー ド と 言う こと は わか る で 
し ょ う . 上 の 図 で も わか る よう に , 1 回 目 の 
input #-1, で 最初 の レコ ー ド (指定 され た 数 の 
デー タ の 組 ) を 読み , 決 の input #-1 で 2 番 
目 の レ コー ド を 読む , と いっ た 具合 に 読み ます 
か ら , テー プ に 記録 され た 時 の 順序 に 従わ な い 
で , デー タ を 読む こと は で きま せん . で すか ら , 
カセ ッ ト 上 の ファ イル は シー ケン シャ ルフ ァ イ 
ル と な る わけ で す . 

次 に , カセ ッ ト 上 の ファ イル に 対す る 制限 を 
考え 2G の 9 ま IUP DD も ちの ペン シー ケシ ジン ジャ カレン 
ァイル で すか ら , 「 書 いた 順序 で し か 読め な い 」 
と いう 制限 は あり ます. それ 以外 で す . それ は 
一 度 記録 し た デー タ は , 書き 換え る こと が で き 
な いと いう こと で す . 一 度 作 っ た ら , デー タ は 
も ちろ ん , レコ ー ド 単位 で も テー プ 上 で 書き 直 
すこ と は で きま せん . 少し で も 修正 し た けれ ば 
ファ イル を 読ん で 修正 し な が ら , 新しい ファ イ 
ル に 書き 込む 手順 が 必要 で す . 要 は , 一 部 の レ 
コー ド だ け の 書換 を は で き な い わけ で す . 

ここ まで , カセ モット 上 に ファ イル を 作る 時 の 
こと を 例 に し て ,。 シー ケン シャ ルフ ァイル に つ 
いて 説明 し まし た が , 実は ディ スク 上 に シー ケ 
ン シ ャ ルフ ァイル を 作る 時 も , ファ イル の 構造 
は カセ ッ ト 上 に 作っ た ファ イル と 全く 同じ な の 
で す . また , ファ イル に 対す る 制限 も ほとん ど 
同じ で す . で すか ら フ ァイル を 読み 書き する と 
き に は , カセ ッ ト 上 の ファ イル の 動作 の 説明 を , 
も う 一 度 読ん で くれ れ ば いい わけ で す . 制限 も 
「 フ ァイル の 一 部 を 修正 する こと は で き な い 」 
COOKSWCRGs9 計 だ (だ 2 衣 作 ス ペン た の ドン ニニ ク 。 ジ ン 
シャ ルフ ァイル の 場合 は , 一 部 の 変更 は 無理 で 


す が , 最後 に 追加 する こと は で きま す . 

シー ケン シャ ルフ ァイル に つい て まとめ て み 

ます . 決 の こと だ け は , 後に 書く ラン ダム ファ 

イル を 理解 する 時 の た め に も , 覚え て お いて 下 

さい . 

* ネ シー ケン シャ ルフ ァイル と は , 書い た 順序 
で し か 読め な い フ ァイル で ある . 

* フ ァイル の 一 部 を 変更 する こと は で き な い . 
で きる の は , 最後 へ 追加 する こと だ け で あ 
る . 

* 一 度 に 読み 書き で きる デー タ (レコ ュー ド ) 
の 長 さ は 変え る こと が で きる . 


So の 2 ラジ ンジ ダム ラ ァイル 

シー ケン シャ ルフ ァイル の 説明 を 読ん だ 方 は . 
フン クタ バン 7 イル が と ん な もの で ある か な /。 
と な く 想像 が つい た と 思い ます 。 そ し て た ぶ ぶ ん 
その 想像 は あたっ て いる こと で し ょ うぅ 。 
へ ファ イル と は , すなわち 「 任 意 の 場所 を アク 
2 きる フアン ルル 計 と ie9 計 30 の な の で 
す 。 簡 単に シー ケン シャ ルフ ァイル と 比較 し な 
が ら 説 明 す る と ラン ダム ファ イル と は 次 の よう 
に な り ま す 。 


ERR 


1) シー ケン シャ ルフ ァイル に 書か れ た デー タ 
を 読む 時 は , 書い た 順序 で し か 読め ませ ん 
で し た が , ラン ダム ファ イル で は , 何 番目 
の レコ ー ド で も 自由 に 読む こと が で きま す . 


2) シ ー ケ ン シ ャ ルフ ァイル で は , 一 部 の レコ 
ー ド の 書換 え は で きま せん で し た が ,。 ラン 
グ ム ファ イル で は , 何 番目 の レコ ー ド で も , 
自由 に レコ ー ド 単位 の 書換 え が で きま す . 


どう で す . シー ケン シャ ルフ ァイル と 比較 す 
る と , ラン ダム ファ イル の 特長 が よく わか る の 
で は あり ませ ん か . さて , も っ と 詳し く , 下図 
の モデ ル を 使っ て 説明 し まし ょ う . 


ジジ 多 。 


ァイル 


md《 く トー-m 


さ て, 上 の 図 は N 個 の レコ ー ド で 構成 され る , 
ラン ダム ファ イル を 示し て いま す . この ラン ダ 
2WZ ア イリ レ に 対し て 実行 で きる こと は , 

1) レコード 番 号 n (1 snSN) の レコ ー ド を 

読み 出す . 

2) レ コー ド 番 号 n (1 sn<N) の レコ ー ド に 

書き 込む . 

3) レコ ー ド 番号 が N 以上 の レコ ー ド へ 書き 込 

む . 
の 3 点 で す . 


1) と 2) は , 先 に 書い た ラン ダム ファ イル の 2 
つの 特長 「 何 番目 の レコ ー ド で も 読め る 」 と 「 何 
番目 の レコ ー ド で も 書換 え で きる 」 を 書き な お 
し た も の で す . 

3) は ファ イル へ 追加 する 機能 を 示し て いま す . 

フン ダム ファ イル が どん な も の か 理解 で きた 
ES5A の 全然 ちから な い 人 に は ,。 ラン ダム 
ファ イル の 説明 を も う 一 度 く わし く 説 明 い た し 
ます , な ん と な く 分 っ た よう な 気 の す る 人 は , 
どう ぞ 先 へ 読み 進ん で も ら っ て も 結構 で す . 

ラン ダム ファ イル の 特長 は , 何 番目 の レコ ー 
ド で も アク セス で きる こと で す が , な ぜ こ ん な 
こと が で きる の か を 説明 し ます . これ は , 逆 に 
言え ば, な ぜ シ ー ケ ン シ ャ ルフ ァイル で は 任意 
の レコ ー ド を アク セス で き な い か に 通じ て いる 
に あら God 

任意 の レコ ー ド を アク セス する ため に は , 2 
つの 条件 が 必要 で す . 

・「n 番目 の レコ ー ド 」 を アク セス し よう と す 
る と き , その 「n」 の 数 字 か ら , レコ ー ド が 
ファ イル 中 の どこ に ある か を , 知る こと が 
で き な け れ ば な り ま せん . 


・ レ コー ド を 書き 換え る 時 の こと を 考え る と, 
書き 換え た 後 の レ コー ド の 長 さ が , 書き 換 
える 前 の レコ ー ド の 長 さ より 長く な っ て は 
いけ ませ ん . 


さき て , 最初 の 条件 の 意味 は 分 る で し ょ う .「n 
番目 の レコ ー ド の 場所 」 と いう の は , ファ イル 
の 先頭 か ら , n 番目 の レコ ー ド まで の 距離 と も 
言え ます . その 様子 を 図 に 描く と , 


| 


ー ド 
2 
レコ ー ド n ま で の 
距 各 


ファ イル 


こん な 具合 で す . 

2 番 の 条件 を 考え ます . 悪い 例 を 図示 すれ ば , 
すぐ 理解 で きる と 思い ます . 2 番目 の レコ ー ド 
を 書換 える 時 の , 書換 える 前 後 の 図 で す . 


Eb 書換 え 前 


や 
NN 


ン 


レコ ー ド 2 の 長 さ が , 書換 え 前 より 長く な っ 
た ら , レコ ー ド 3 の 長 さ が 短く な っ て し まい ま 
し た . 実 は レコ ー ド 3 は 短く な っ た の で は な く , 
破壊 され て し まっ た の で す . 正確 に 言え ば , 

「 レ コー ド 2 が 長く な っ て し まい , 本 来 な 
ら レ コー ド 3 の 記録 部 分 に まで 及び , レコ 
ー ド 3 の 一 部 を 消し て し まっ た .」 

と いう こと で す . これ を 防ぐ 方 法 が な いわ け 

で は あり ませ ん . レコ ー ド 2 が 延長 され る な ら 


貴 換 え 後 


ら 己 


ば , レコ ー ド 3 を 後方 に ずら ちせ ば よい の で す . 
レコ ー ド 3 を 後方 に ズラ す た め に は , レコ ー ド 
4 を 後方 に ズラ し て , さら に レコ ー ド 4 を 後方 
に ずら す た め に は , レコ ー ド 5 を 後方 へ ずら し 
て の の ee 、 結 局 書換 える レコ ー ド 以後 を , 全部 
後方 に ズラ さ な け れ ば な ら な いわ け で す . これ 
は 手間 の か か る 操作 で すし , この 操作 を する と , 
先 に 書い た 「 フ ァイル 中 の レコ ー ド の 場所 」 が 
書換 え を する た びに 変化 し ます か ら , いよ いよ 
ラン ダム に アク セス で きる ファ イル を 構成 する 
こと は 難し く な り ま す . 

ラン ダム ファ イル と いう の は , 任意 の レコ ー 
ド の 書換 え が で きる と いう , 非常 に 便利 な 特長 
を 持っ て いま す が , その た め に 2 つの 条件 を 満 
足す る よう な 構造 の ファ イル を 実現 し な けれ ば 
な ら な いわ け で す . し た が っ て , ラン ダム ファ 
イル を 作る 手順 は , シー ケン シャ ルフ ァイル を 
作る 手順 より も 少し 複雑 に な り ま す . 実際 の 具 
体 的 な 手順 は 第 2 章 と 第 3 章 で 書く こと に し て , 
ここ で は どの 様 に 2 つの 条件 を 満足 する ファ イ 
ル を 構成 し て いる か を 説明 し まし ょ う . 

まず 結論 を 先 に 書け ば , レコ ー ド の 長 さ を 固 
定 し て それ を 実現 し て いる の で す . 固定 長 の レ 
コー ド を 覚え て いま すか ? レコ ー ド の 説明 の 
最後 に , 少し 説明 し まし た が , 忘れ て いる な ら , 
も う 1 度 読 み 直し て 下さ い . 

固定 長 の レコ ー ド を 採用 する こと で ラン ダム 
ファ イル を 実現 する た め の 2 つの 条件 は , 解決 
され ます . 第 2 の 条件 の 

「 レ コー ド を 書換 える 前 の 長 さ が , 書換 え 後 

の 長 さ より 短く て は いけ な い .」 

は , 考え る まで も な く 満 た され て いま す . 

第 1 の 条件 の 

「 レ コー ド が , ファ イル 中 の どこ に ある か を 

知る こと が で き な け れ ば な ら な い .」 

が 満た され て いる と いう こと も , 少し 考え れ 
ば 理解 で きま す . これ は ファ イル の 先頭 か ら 
の 距離 が 分 れ ば よい の で すか ら . 


ファ イル 
最後 の 
レコ ー ド | レコ ー ド 2 レコ ー ド n レコ ー ド 
レコ ーF ド n 
まで の 征 朗 レコ ー ド の 


長 さ 


n 番目 の レコ ー ド まで の 距離 は , 

レコ ー ド の 長 さ * (n-1) 
の 簡単 な 式 で 示さ れる こと を 使え る ば よい の で す . 
アク セス し た い レ コー ド 番 号 を 与え れ ば , この 
式 を 使っ て , 即座 に レコ ー ド の 存在 する 場所 が 
分 り ま す . 


どう で す 2? 任意 の レコ ー ド を アク セス で き 
る ファ イル の 構造 が 理解 で きま し た か ? 要 す 
る に, 固定 長 の レコ ー ド 方 式 を 用 いる こと に よ 
っ て , すべ て の 問題 を 解決 し て いる わけ で す . 
本 当 の と ころ , 固定 長 レ コー ド 方 式 は , ディ ス 
ク の ハー ドウ ェ ア に と っ て も 都合 が いい の で す . 
この 話 は この 後 , 使用 宣言 と 終了 定 言 の 項 で も 
簡単 に 書き ます . 詳し い 話 は 第 6 章 と 第 7 章 を 
読ん で 下さ ぃ い . 

最後 に ラン ダム ファ イル の これ まで 説明 で 
き な か っ た 特長 を 書い て お きま す . 

・ ま ず 最 初 に あげ られ る の が , 任意 の レコ ー ド 
を アク セス する の に , 時 間 が か か ら な いと い 
うこ と で す . シー ケン シャ ルフ ァイル で は 任 
意 の レコ ー ド を 読む た め に は , レコ ー ド を 一 
個 一 個 読 き な け れ ば な り ま せん . ラン ダム フ 
ァイル で は , 途中 の レコ ー ド を 省 い て アク セ 
ス で きま すか ら 当 然 速度 は 速い は ず で す . 

・ ラ ンダ ム フ ァ イル で は , ファ イル の 使用 効率 
が 悪く な り ま す . 固定 長 の レコ ー ド は , レ ュ 
二 ト 内 が アニ ク で 埋まる の に は は じん と あり 
ませ ん . 従っ て , ファ イル 全体 の 長き の 割 に 

は デー タ の 量 が 少く な り ま す . 

1. 3. 3 ファ イル の 種類 の まとめ 


ファ イル の 種類 と 構造 を 説明 し て きま し た が , 


どら 


ご SE で 馬 まで 説明 し て きた ファ イル の いろ 
いろ な 人 性質 を も う 一 度 復習 し て み ま し ょ う . 

まず , ファ イル は プロ グラ ム を 保存 する た め 
の プロ グラ ム フ ァ イル と , デー タ を 保存 する た 
め の デ ー タ ファ イル に 分 類 で きま し た . そし て 
プロ グラ ム フ ァ イル に は , 人 間 が 入力 し た 形 の 
アス キー 形式 の ファ イル と , BASIC の 中 間 言 語 
に な お し た 時 の 形 の 非 アス キー 形式 の ファ イル 
6 の り UE 唐人 

語 2 上 2 多 グ テ イ ル に は ,。 ファ イル 中 の デ 
ー ク を アク セス する 方 式 の 違い に よっ て , シー 
ケン シャ ルフ ァイル と ラン ダム ファ イル の 2 つ 
が あり まし た ね . 

下 の 図 は まで に 説明 し た ファ イル を 系 
統 的 に 分 類 し た 図 で す . Disk-BASIC は , 図 に 
書か れ た 全て の ファ イル を 操作 する 機能 を も っ 
て いる わけ で す . た だ , 誤解 し な いで ほし い の 
で す が , ファ イル の 種類 は 図 に 示し た も の だ け 
で は あり ませ ん . 上 に 示し た 図 は , Disk-BASIC 
が 操作 で きる ファ イル の 種類 で すか ら , 自分 で 
プロ グラ ム を 書け ば , 図 に な い タ イプ の ファ イ 
ル を 作る こと も 可能 で す . その 例 と し て , 第 4 
剖 で , 機械 語 の プロ グラ ム の ファ イル を 作る 方 
法 を 示し て あり ます . 


ーー 
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ae。 
プロ グラ ム フ ァ イル ra 
中 間 言 語形 式 
ファ イル 
ラン ダム ファ イル 
2 ニク グ 7 イル 
シー ケン シャ ルフ ァイル 
1. 4 使用 宣言 と 終了 宣言 


1. 4. 1 基礎 知識 
第 0 章 で 軽く 触れ まし た が , ディ スク シス テ 
ム を 使用 する 時 に は , 使用 宣言 と 終了 宣言 を 欠 
か すこ と が で きま せん . し か も , この 宣言 に は 
ディ スケ ッ ト の 使用 に 対す る 宣言 と デー タフ 
ァイル の 使用 に 対す る 宣言 が あり , 事実 上 2 重 


に 宣言 する こと が 必要 で す . な ぜ こ ん な 定 言 が 
必要 な の か を 知る に は , 次 の 3 点 に つい て の 知 


識 が 必要 で す . 


1) デ ィ ス ケッ ト 中 の ファ イル の 構造 
2) フ ァイル 中 の デー タ の 構造 
3) デ ィ ス ケッ ト 中 の デー タ の アク セス 方 法 


1) に つい て は , 第 0 章 で 簡単 に 説明 し て あり ま 
す . 第 0 章 で は ,「 デ ー タ が ディ スケ ッ ト 中 の ど 
こ に 記録 され て いる か を 示す . 住所 録 の よう な 
も の が あっ て ……」 と 書き まし た が , 実は この 
説明 の 中 の デー タ と は , ファ イル の こと な の で 
す . 従っ て ,「 デ ー タ が …… 」 の 説明 は 
「 デ ィ ス ケッ ト 中 に は , ファ イル と , フ 
ァイル が ディ スケ ッ ト 中 の どこ に 記録 され 
て いる か を 示す 配置 表 (住所 録 ) が 存在 す 
る 」 
と 書き 直せ る わけ で す . 
配置 表 に は , ファ イル 名 と ファ イル が 記録 さ 
れ て いる 場所 が 登録 され て いま す . 
この 様子 を 図示 する と , 次 の よう に な る で し 
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ディ スケ ッ ト 


ASCII と いう 
ファ イル 名 の 


ファ イル 名 ファ イル 
の 場所 


図 の ディ スケ ッ ト に は , ASCII と いう ファ イ 
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ル が すでに 記録 きれ て いる こと も わか る と 思い 
まま 9 大 

図 の よう に , 名 前 と 場所 を 記録 し た 配置 表 を 
用 いる と, 人間 が ファ イル を 扱う 時 に は , 全て 
ファ イル 名 で 扱う こと が で きる の で す . ファ イ 
ル 名 を 指定 すれ ば , 即 フ ァイル の 場所 が 分 り ま 
すか ら , 人 間 様 が わざ わざ ファ イル の 場所 を 考 
そる 必要 は な いわ け で す . も っ と も , 実は 配置 
表 は こん な に 単純 な も の で は な く , も っ と 複雑 
な 構造 に な っ て いる の で す が , 使用 宣言 と 終了 
宣言 を 理解 する た め の 知識 と し て は , これ で 十 
分 で す . も っ と 詳し く 知 り た い 人 は 第 7 章 を 読 
ん で 下さ い 、. 

2) の ファ イル 中 の デー タ の 構成 は , 前 節 の 1・ 
3 ファ イル の 種類 で 書き まし た . 読め ば 
十分 で す . 

3) に つい て は 注意 が 必要 で す . これ は ディ ス 
ケッ ト に デー タ を どん な 構成 で 記録 する か と い 
う ソ フト ウェ ア 的 問題 で は な く , 記録 する た め 
の ハー ドウ ェ ア 的 問題 の こと だ か ら で す . ちょ 
うと や や こい の で す が , ここ で は 湊 の 志 と だ 
け を 覚え て お いて 下さ い . 

* ま ディ スク へ の デー タ の 読み 書き は , 256 バ イ 
ト 単位 で し か 行え な い . 

256 バ イト と いう の は , 純粋 に ハー ドウ ェ ア 上 の 
規定 で 。 1 バイ ト や 2 バイ ト 単 位 で は 不可 能 な 
の で す . 

この 事実 を 知る と , シー ケン シャ ルフ ァイル 
の 構造 の 所 で 筆者 が 嘘 を 書い た と 思わ れる 読 
が いる か も し れ ま せん が , そう で は あり ませ ん . 
ファ イル と いう の は , デー タ の 集合 を 論理 的 に 
考え た 単位 で 、 デ ィ ス ケッ ト に 書き 込む 単位 と 
いう の は , デー タ の 集合 の 物理 的 単位 で ある か 
ら で す . 
論理 的 単位 と , 物理 的 単位 に は ギャ ッ プ が あぁ 
り ま す が ,Disk BASIC が その ギャ ッ プ を 埋め 
て くれ ます か ら , 我々 は 論理 的 単位 の ファ イル 
を 扱っ て いれ ば よい わけ で す . 


ー ーー 
ーー 


と に か く ぐ , ここ で は ディ スク へ 読み 書き は , 
256 バ イト 単位 と いう こと を 覚え て お いて 下さ い . 
基礎 的 な 知識 を 得 た ら , 次 は 使用 宣言 と 終了 
官 言 の 動 作 に つい て 説明 し ます . 前 に も 書い た 
よ うに, 使用 宣言 と 終了 宣言 は ディ スケ ッ ト に 
対す る も の と , デー タフ ァイル に 対す る も の が 
あり ます . まず ディ スケ ッ ト に 対す る 宜 言 を 説 
明 し て , 次 に デー タフ ァイル に 対す る 宣言 を 説 
明 il 有 ま 量り た 


1. 4 2 ディ スケ ッ ト に 対す る 宣言 
ディ スケ ッ ト の 使用 宣言 は mount と いう コマ 
ンド で 行ない 終了 宣言 は remove コマ ンド で 行 
な いま す . 実際 の 使い 方 は 第 2 章 を 読ん で 下さ 
い . ここ で 説明 する の は 2 つの コマ ンド の 動作 
と な ぜ 必 要 な の か と いう) 理由 で す . 

前 に ディ スケ ッ ト 中 の ファ イル を アク セス す 
る た め に 、 デ ィ ス ケッ ト 中 に は ファ イル の 住所 
録 が 記録 され て いる こと を 書き まし た が , 使用 
定 言 と 終了 宣言 は , この 住所 録 に 対し て 実行 す 
る コマ ンド な の で す . も う 少 し 具体 的 に どう や 
っ て 宣言 を 行なう か 考え て み ま し ょ う . 


1) まず ドラ イプ に ディ スケ ッ ト を 挿入 し ます . 


2) デ ィ ス ケッ ト の 使用 宣言 を し ます . する と 、 
ディ スケ ッ ト 中 の 住所 録 が , PC-8001 の 内 部 に 
コピ ー さ れ ま す . 


3) デ ィ ス ケッ ト 中 の ファ イル を 読む , 又は 新 し 
い フ ァイル を 作る 等 , ファ イル の 操作 を 行 な 
いま す . この 時 住所 録 を 書き 直し ます が , こ 
の 操作 は PC-8001 に コピ ー さ れ た 住所 録 に 対 
し て 行わ れ ま す . 


4) デ ィ ス ケッ ト の 終了 定 言 を し ます . 終了 宣言 
に 85 っ て PC-8001 内 部 に コピ ー さ れ て いた 住 
所 録 が ,。 デイ スケ ッ ト に 書き 込ま れ ま す . 


晶 


5) ド ライ ブ か ら デ ィ ス ケッ ト を 取り 出し ます . 


この 手順 を 読め ば 分 る で し ょ う が , ファ イル 
を 操作 する 時 に は , PC-8001 内 部 に コピ ー さ れ て 
いる 住所 録 を 使う わけ で す . 住所 録 の 変更 も コ 
ピー され て いる も の に 対し て 行わ れ ま すか ら , 
最新 の 住所 録 は PC-8001 の 内 部 に ある 住所 録 で , 
ディ スケ ッ ト 中 の 住所 録 で は あり ませ ん . 最新 
の 住所 録 は 終了 宣言 で ディ スケ ッ ト に 書 込 ま れ 
る わけ で す . 

ディ スケ ッ ト の 住所 録 の 正常 な 動き は 下図 の 
よう に な り ま す . 


住所 録 (最新 ) 


P C-8001I 


住所 録 は 1 枚 の ディ スケ ッ ト 中 の ファ イル の 
配置 で すか ら , 個々 の ディ スケ ッ ト て で 内 容 が 尊 
いま すし , 一 杉 の ディ スケ ッ ト で も , ファ イル 
の 操作 を 行う た びに 変化 し ます . ディ スケ ッ ト 
の 使用 宣言 と 終了 宣言 は , 変化 の 激しい 住所 録 
を 最新 に 保つ た め に 必要 な 処理 な わけ で す . 

さて , この ディ スケ ッ ト に 対す る 使用 定 言 
終了 宣言 が 確実 に 行わ れ な いと , どう な る で し 
ょ うか 。 次 の よう な 状態 を 想像 し て 下さ い . 

* 使 用 官 言 を し て , 新しい ファ イル を 作っ た 
後 で ディ スケ ッ ト を 他 の も の と 変換 し て 終了 
邊 (る | 男 ま つた だ 、 

この 状態 を 図 に 書く と , 次 の よう に な り ま す . 


が ズ ケツ ド | 


住所 録 (最新 ) 


PC 8001I 


まず , 使用 定 言 及び 新 フ ァイル を 作っ た ディ 
スケ ッ ト に つい て 考え て み ま し ょ ). 

新 フ ァイル を 作っ た の で , ディ スケ ッ ト 中 に 
は 新 フ ァイル が 記録 され ます . 又 , PC 内 部 の 住 
所 録 に も 新 フ ァイル が 登録 さき れ ま す . し か し こ 
の ディ スケ ッ ト に 対し て 終了 年 言 を 行わ な か っ 
た の で , 新しい 住所 録 は 記録 さき れず , この ディ 
スケ ッ ト 中 の 住所 録 に は 新 フ ァイル は 記入 され 
て いま せん . 

次 に , 終了 官 言 を 行っ た ディ スケ ッ ト に つい 
6 考 iG み まじ しょう. 

この ディ スケ ッ ト へ は , ファ イル の 書込み は 
し て いま せん が , ディ スケ ッ ト 1 の 新しい 住所 
録 が 書き 込ま れ て いま す . 

結局 , 2 枚 の ディ スケ ッ ト の 両方 と も , 住所 
録 が 実際 の ファ イル の 名 前 や 位置 と か み 合 わな 
く 〈 な っ た わけ で す . 

この 状態 は ,。 あな た が 見 知ら ぬ 町 で 間違っ た 
地図 を 頼り に 郵便 配達 を する よう な 状態 な の で 
す . 郵便 配達 な ら ば 聞く こと も で きま す が , 人 
に 聞け な い PC-8001 は ,、 た だ オロ オロ …. 

と に か く デ ィ ス ケッ ト 中 の 住所 録 は 大 切な も 
の で すか ら , これ を 破壊 し な いよ うに , ディ ス 
ケッ ト の 使用 宣言 と 終了 宣言 は 忘れ な いよ うに 
し な いと いけ ませ ん . 
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1. 4. 3 デー タフ ァイル に 対す る 宣言 
デー タフ ァイル に 対す る 使用 宣言 と 終了 宣言 
は , プロ グラ ム 中 で デー タフ ァイル を 使用 する 
こと の 富 言 と , 使用 を 終え を た こと の 宣言 で , open 
と close で 宣言 し ます . 実際 の 使用 に 当っ て は , 
使用 官 言 の モ ー ド と か 使い 方 が ある わけ で す が , 
その 話 は 第 2 章 で し ます . こ こ て で 説明 する の は , 
定 言 が どん な 動作 を する か で あり , 何故 必要 な 
の か と いう 理由 で す . 
さて 使用 宣言 に よっ て PC-8001 が どん な 動作 
を する の か 説明 し まし ょ う . デー タフ ァイル の 
使用 宣言 に よっ て , 決 の 2 つの 動作 が 行わ れ ま 
す . 
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* フ ァイル を プロ グラ ム 中 で どう 呼ぶ か 決め 
る . 

* デ ィ ス ケッ ト へ 書き 込ん だ り , ディ スケ ッ 
ト か ら 読み 出す た め の 領 域 を 割当 て る . 


何やら 理解 し が た いこ と の よう に 思わ れる 方 
も いら っ し ゃ る で し ょ う が , 実際 に 使用 する 時 
に 理解 し て いな けれ ば な ら な い の は , 最初 に 書 
いた プロ グラ ム 中 で の 呼び 方 だ け で す . 従っ て 
興味 の な い 方 は , 2 番目 の 説明 は 読ま な く て も 
か まい ませ ん . 逆 に , 更に 詳し く 知 り た いと 思 
っ た 方 は , 第 6 章 や 第 7 章 を 読ん で 下さ い . 

実際 の 説明 に 入り まし ょ う . まず 最初 の 「 プ 
ログ ラム 中 で ファ イル を どう 呼ぶ か を 決め る 」 
(の WO:d 記 
先 に 書い た よう に , 我々 人 間 は ファ イル を 扱 
うと き は ファ イル 名 で 扱い ます . し か し Disk- 


入出 力 を 行う こと は で きま せん . ファ イル 番号 
で 入出 力 を 行い ます . 従っ て , あら か じ め フ ァ 
イル 名 と ファ イル 番号 の 対応 を 宣言 する 必要 が 
ある わけ で す . 

この こと を 図示 する と, 下 の よ うに な り ま す . 


人 間 は ファ イル を ファ イ ル 名 で 扱い ます が , 
コン ピュ ー タ は ファ イル 番号 で 扱い ます . ファ 
イル 番号 と ファ イル 名 を 対応 ( 図 の 破線 部 ) さ 
せる の が , ファ イル 使用 官 言 で す . プロ グラ ム 
の ファ イル の 呼び 名 と は , この ファ イル 番号 を 
意味 し て いる わけ で す . 

具体 的 な ファ イル 番号 の 形 は , 抽 一 抽 5 の うち 
どれ か で す が , 条件 が つき ます . 

実際 に Disk-BASIC を 使っ た 方 は 知っ て いる 
と 思い ます が , シス テム を セッ ト し た 時 , Disk 
-BASIC は 


How Many Files ( 0 -15) ? 


と 聞い て いま す . この 質問 の 意味 は , 後 で 説 
明 し ます が , ここ で は , ファ イル 番号 を いく つ 
まで 使う の か 聞い て いる と 考え て か まい ませ ん . 

つま り , 最初 の 質問 に , 7 ? と 答え れ ば , フ 
ァイル 番号 は , 林 一 記 ま で し か 使用 で き な い わけ 
で す . も し 最初 の 質問 に `0 ? と 答え れ ば プロ 
グラ ム 中 で デー タフ ァイル を 使用 で き な い こと 
な り ま 3: 
ファ イル 名 と , ファ イル 番号 の 対応 ざけ に つ 
いて 理解 で きた で し ょ うか . 理解 で きれ ば , 
ー タ ファ イル を 使用 する プロ グラ ム の 手順 も わ ゎ 
か っ て くる と 思い ます . 
プロ グラ ム 中 で ファ イル を 使用 する に は 次 の 
手順 を 踏む わけ で す . 


っ ゆ 
に つ 


1) ファ イル の 使用 宣言 を し て , 使用 する ファ 


デ 


コロ 


イル 名 と, ファ イル 番号 の 対応 づけ を する . 
2) フ ァイル 番号 で , 目的 の ファ イル に 入出 力 
を 行う . 
3) ファ イル 終了 宣言 を し て , 使用 し た ファ イ 
ル 名 と , ファ イル 番号 の 対応 を 解く . 


3) の 終了 宣言 に つい て は 説明 し て いま せん が , 
わか る と 思い ます . 使用 宣言 で 対応 づけ し た 関 
係 を 解く わけ で す . 対応 を 解 か れ た ファ イル 番 
号 は , ブロ 野球 の 自由 契約 の 選手 の よう な も の 
で すか ら , 次 の ファ イル 名 と 対応 づけ る こと が 
で きま す . 

ファ イル 番号 の 例 と し て まで 何 度 も 登 
場 し て も ら っ た カセ ッ ト テ ー プ 上 の ファ イル に 
再び 登場 し て も らい まし ょ う . カセ ッ ト へ ファ 
イル を 作る ステ ー ト メン ト は お な じみ の 


ーー 
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print #-1, < 変数 の 組 > 
で , ファ イル を 読む ステ ー ト メン ト は 
input 持 1 < 変数 の 組 > 


で し た ね . こ の 2 つの ステ ー ト メン ト の #-1 の 部 
分 に 注目 し て 下さ い . これ が ファ イル 番号 に あ 
た る わけ で す . カセ モット で ファ イル を 扱う 時 に 
は , ファ イル は 1 個 し か 使用 で きず , その ファ 
イル 番号 が 一 1 に 固定 され て いる わけ で す . さき 
ら に , カセ ッ ト 上 の ファ イル で は , ファ イル 名 
は 使え ませ ん か ら , ファ イル 名 と ファ イル 番号 
の 対応 づけ を する 使用 宣言 と , 対応 づけ を 解く 
終了 年 言 は 必要 な いこ と も 理解 で きる で し ょ う ). 

ここ まで 明らか に な っ た こと を , まとめ て み 
ます . PC-8001 が , ディ スク が 接続 きれ て いな 
い 状 態 で 使え る ファ イル は , カセ ッ ト テ ー プ 上 
の ファ イル だ け で , ファ イル 番号 は 一 1 で す . 
この 状態 は 下 の よ うに 書け ます . 


ファ イル 番号 


PC-8001 
カセ ッ ト 


一 方 , PC-8031 (3032) が 接続 きれ る と , ディ 
スク 上 の ファ イル 群 が 使 用 で きる こと に な り ま 
す . この ファ イル 番号 は 可変 で す が , 最大 で 1 


ー15 ま で で す . また , それ ぞ れ の ファ イル 番号 
に 対す る ファ イル も 固定 され て お ら ず , 使用 宣 
言 で 結び つけ て , 終了 定 言 で 切り は な す と いう 
方 法 が と られ て いま す . 

この 状態 は 下 の よ うに 書け る で し ょ う . 


PC-8001 


次 に 説明 する の は 使用 宣言 の 動作 の 2 番目 で , 
ディス ケッ ト へ 書き 込ん だ り , ディ スケ ッ ト か 
ら 読 み 出 し た りす る た め の 領 域 を 確保 する 動作 
に つい て で す . 前 に 説明 し た ファ イル 名 の 宣言 
は , 私 た ち が 実 際 に 行なわ な けれ ば な ら な い , 
言わ ば 目 に 見 える 動作 で し た が , この 動作 は 目 
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に 見 えな い 動作 で , Disk BASIC が すべ て 行い 
ます か ら , 興味 の な い 人 は 読ま な く て も 結構 で 
す . 

前 に ディ スク へ の 読み 書き は , 256 バ イト で し 
か 行え を な いこ と を 書き まし た . 一 方 で , 我々 人 
間 が デー タ を 扱う の は ファ イル 単位 で , 更に フ 
ァイル は レコ ー ド 単位 で 読み 書き する こと も 書 
きま し た . 先 に 書い た 256 バ イト を デー タ の 物理 
的 単位 と すれ ば , ファ イル (レコ ー ド で も か ま 
いま せん ) は デー タ を 扱う 際 の 論理 的 単位 と 言 
KK225rG3 5 2 

論理 的 単位 と 物理 的 単位 が 一 致し て いれ ば い 
い の で す が , 大 抵 の 場合 うま くい きま せん . フ 
ァイル に デー タ を 書き 込む 時 , 書き 込む デー タ 
の 長 さ を 計算 し て 256 バ イト に 調整 する こと を 好 
む 人 は いな いと 思い ます . 

そこ で , Disk-BASIC は , 自動 的 に 物理 的 単 
位 を 論理 的 単位 へ , 論理 的 単位 を 物理 的 単位 へ 
変換 し て くれ る よう に な っ て いま す . デー タ の 
書き 込み , 読み 出し 用 の 領域 と いう の は 変換 の 
手段 と し て 用 いら れる 領域 で の こと で , バッ フ 
ァ (Buffer) 領域 と 呼び ます . 

バッ ファ 領域 を 使っ て , どの よう に 物理 的 単 
位 と 論理 的 単位 の 変換 を 行う か 簡単 に 説明 し ま 
し ょ う . 詳し い 話 は 第 7 で 参照 し て 下さ い . バ 
ッ フ ァ 領 域 と は ディ スケ ッ ト へ の 物理 的 な 読み 
書き の 単位 分 の 長き (256 バ イト ) を も っ た 領域 
の こと で 、 論 理 的 な 単位 で 読み 書き され る デー 
タ は すべ て この バッ ファ 領域 に 対し て 行わ れる 
わけ で す . 最終 的 に バッ ファ 領域 が 一 杯 に な る 
か , ディ スケ ッ ト へ の 書き 込み , 読み 出し の 指 
示 が 来 た 時 に , バッ ファ 領域 の 内 容 を ディ スケ 
ッ ト へ 書く と か , 次 の 物理 的 単位 の デー タ を デ 
ィ ス ケッ ト か ら 読 むと か する よう に な っ て いま 
す . 

と に か く , 物理 的 な デー タ の 単位 と 論理 的 な 
デー タ の 単位 の ギャ ッ プ を 埋め る た め に , それ 
ぞ れ の ファ イル に つい て バッ ファ 領域 が 必要 な 


わけ で す . 

ここ まで 読め ば , も うわ か っ た と 思い ます が , 
使用 宣言 で は , 使用 を 宣言 され た ファ イル に つ 
いて バッ フ プア ァ 領域 を 割当 て る の で す .` 割 当て る ” 
に つい て 注意 し て 下さ い . “準備 する "で は あり 
ませ ん . 割当 て る 時 に は 既に バッ ファ 領域 は 準 
備 さ れ て いる の で す . いつ 準備 する の で し ょ う 
か ?Disk BASIC は 常時 使用 で きる ファ イル の 
最大 数 で ある 15 個 の バッ ファ 領域 を 準備 し て い 
る の で し ょ うか ? 違い ます . そん な 無駄 な こと 
は し ませ ん . 

気付 いた 人 も いる で し ょ う . 先 に 書き まし た 
が , シス テム を リセ ッ ト し た 時 に 質問 きれ ます . 


How Many Files ( 0 -15) ? 


この 質問 に 答え た 数 だ け バ ッ フ ァ 領 域 が 準備 
され る の で す . 3 と 答え れ ば , バッ ファ 領域 は 
3 個 分 確保 きれ る わけ で す . バッ ファ 領域 は , 
使用 する ファ イル 1 個 に つき 1 個 必 要 で すか ら , 
バッ ファ 領域 が 3 個 分 し か な けれ ば , ファ イル 
は 同時 に 3 個 ま で し か 使用 で きま せん . 

実 を 言え ば ,「 バ ッ フ ァ 領 域 を 割当 て る 」 の " 割 
当て る ” に も 少々 語 幣 が あり ます . "割当 て る ? 
と 書く と , 使用 宣言 され た ファ イル に 対し て , 
準備 され た バッ ファ 領域 の うち どれ が 選ば れる 
の か , まる で “くじ 引き ? で 決ま る よう な 感じ 
が し ます が そう で は あり ませ ん . 

バッ ファ 領域 は 。 ファ イル 番号 に つき 1 個 ず 
つ 定 まっ て いる の で す . し た が っ て ファ イル の 
使用 宣言 で ファ イル 番号 を 指定 する と , 即座 に 
どの バッ ファ 領域 が 使用 きれ る か 決ま る わけ で 
す . 又 , ファ イル 番号 も , 準備 され て いな い バ 
ッ フ ァ 領 域 に 対応 し た 番号 は 使え を な いこ と に な 
り 馬 9 交 
以上 の 2 点 が デー タフ ァイル の 使用 宣言 の 動 
作 で す . 2 つの 動作 の 説明 を 理解 し た 人 な ら す 
ぐ わ か る と 思い ます が , 動作 が 2 つ あ る と いっ 
て も , 実質 的 に は 1 つの 動作 で 済む わけ で す . 


ご 


な ぜ な ら , バッ ファ 領域 は ファ イル 番号 に 対応 
し た 領域 で すか ら , ファ イル 番号 を 決定 し た 時 
点 で バッ ファ 領域 も 自動 的 に 決定 され ます . 改 
め て バッ ファ 領域 を 割合 て る 必要 は な いわ け で 


使用 宣言 で 結び つけ る 。 


バッ ファ 領域 まで 考慮 し て PC-8001 の ファ イ 
ル 構 成 を 図示 する と 上 の よう に な る で し ょ う . 
使用 宣言 の 動作 を 理解 し た と ころ で , も う 一 
度 使用 宣言 の 動作 を まとめ て み ま し ょ う . 

ファ イル の 使用 宣言 と は , 使用 する ファ イル 
と , プロ グラ ム 中 で 扱う ファ イル 番号 及び バッ 
ファ 領域 と を , 対応 づけ る 働き を する も の で あぁ 
る . 

こん な 具合 に な る わけ で す . 

さて , 使用 宣言 が 理解 で きた ら , 次 は 終了 写 
言 の 説明 を し まし ょ う . 終了 宣 つい て は 先 
に も ちょ っ と 触れ まし た が , 使用 宣言 で 対応 づ 
けし た ファ イル 番号 と ファ イル 名 の 対応 づけ を 
解く わけ で す .。 ファ イル の 終了 宣言 は プロ グ 
ラム 中 で 行なわ な く て も , 自動 的 に PC-8001 が 
行う 場合 が あり ます か ら , (第 2 章 , close の 項 
を 見 て 下さ い ) 省略 し て も いい 場合 も ある の で 
す が , 例え ば 1 つの プロ グラ ム 中 で 2 つの ファ 
イル を 使用 し て , その 2 つの ファ イル の 使用 時 
間 が 重複 し な い 時 , 2 つの ファ イル を 同一 の フ 
ァイル 番号 で 使用 で きま す . こん な 時 に は , 先 
に 使う ファ イル の 終了 宣言 を し て , 後 で 使う フ 
ァイル を , 最初 の ファ イル と 同一 の ファ イル 番 
号 で 使用 宣言 で きる わけ で す . 
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具体 的 に 説明 し まし ょ う . 

上 図 を 見 て 下さ い . 図 は 3 つの ファ イル を 使 
う プ ログ ラム の 例 で , それ が 実行 され た 時 の 使 
用 時 間 を 示し て いま す . 

単純 に 考え を る と , ファ イル 1, ファ イル 2 
ファ イル 3 に , それ ぞ れ H, #2,#3 の ファ イル 番 
号 を つけ れ ば いい わけ で す が , 図 を 見 れ ば 分 る 
通り ファ イル 1 と ファ イル 2 の 使用 時 期 は 重 
複 し て いま せん , 従っ て 。 フ ァイル 1 と ファ イ 
ル 2 を 同一 の ファ イル 番号 で 扱う) こと が で きる 
わけ で す . その た め の フ ァイル の 使用 官 言 と 終 
了 定 言 の 手順 は 

① フ ァイル 1 を 抽 で 使用 宣言 する . 

ファ イル 3 を 培 で 使用 宣言 する . 

ファ イル 1 の 終了 宣言 を する . 

④ フ ァイル 2 を 肌 で 使用 宣言 を する . 

ファ イル 2 と 3 の 終了 宣言 を する . 

と な り ま す . 


1. 5 Disk-BASIC の 働き 


これ まで ファ イル の 構造 に つい て 書い て きま 
し た が , Disk-BASIC の 主 な 仕事 は まさ に その 
ファ イル の 構造 を 実現 し て , 操作 する こと な の 
KG 本 

主 な 仕事 と いっ て も , Disk-BASIC が ファ イ 


ご 


ル の 操作 し か で き な い わけ で は あり ませ ん .N- 
BASIC の 機能 は その まま 引き つい で いる の で す . 
Disk-BASIC は 下図 の 様 に , N-BASIC に ファ 
イル を 操作 する 機能 を 付加 し た BASIC の こと 


な の で す . 
DISK-BASIC 


N-BASIC 


ファ イル を 操作 する 機能 


N-BASIC に つい て は , PCH1 で 説明 し て あり 
ます の で , この PC#H2 で は ファ イル を 操作 する 機 
能 に つい て だ け 説 明 し て いる の で す . 

さて , ファ イル の 構造 を 実現 し , 操作 する の 
が Disk-BASIC の 働き だ と 書き まし た が ,「 1 
- 2 ファ イル の 種類 」 の と ころ で 説明 し まし た よ 
うに , ファ イル に は いく つか の 型 が あり ます . 
Disk-BASIC も ファ イル の 型 に よっ て , その 操 
作法 を 選択 し な けれ ば な ら な いこ と は , 容易 に 
察する こと が で きる で し ょ う . 

2 章 の コマ ンド ・ ス テー トメ ント 一 覧 表 を 見 
て 下さ きい. ディ スク の ファ イル に 対す る 操作 は , 
この 表 中 の コマ ンド , ステ ー ト メン ト を 使用 し 
て 行う わけ で す が , 御覧 の 通り それ ぞ れ の コマ 
ンド な ステ ー ト メン ト は , その 操作 対象 の ファ 
イル の 型 が 定まっ て いま す . 

私 た ち は , 表 中 の ステ ー ト メン ト を 使っ て プ 
ログ ラム を 作り , ファ イル の 操作 を 行う わけ で 
す . 


2 OPERATION 入門 


第 1 章 で は , Disk BASIC の 基礎 的 な こと を 
説明 し まし た の で , この 章 で は 実際 の オペ レー 
ショ ン の と き に 出会う コマ ンド や ステ ー ト メン 
ト ひ と つ ひ と つ に つい て の 一 応 の 説明 と 使い 方 
の 簡単 な 例 を 示す こと に し ます . さら に 詳し い 
説明 や 応用 は 第 3 章 以 降 で 行なう こと に し まし 
2) 。 

2 半 NDDSK ヨ K2 Ks ステ ーッ ド メン 
ト の あら まし 

ディ スク 関係 の コマ ンド や ステ ー ト メン ト は 
何 種 も あり , 一 度 に 覚え よう と し て も 意味 が 混 
乱 し て し まい ます か ら , その 用 途 別 に 区 分 し て 
覚え て いく 〈 こ と に し まじ ょ う | 第 11 章 で ファ イ 
ル を ラン ダム と シー ケン シャ ル の 2 つ に 区 分 し 
ま I 旧 た の 3 語 コ ンジ 4 ド や 2 ドス ンド 証 沙 三 
ケン シャ ル ・ フ ァイル の 操作 に 用 いる も の と , 
ラン ダム ・ フ ァイル の 操作 に 用 いる も の と いう 
よう に 区 分 する こと が で きま す 。 こ と の よう に し 
て 区 分 し た も の を 表 2 - 1 に 示し ます . FILE の 


ファ イル ーーーー プ ログ ラム フ ァイル 
[MOUNT KILL SAVE LOAD| 
REMOVE DSKF RUN MERGEI 
FILS ATTRS の の 隊 上 8 
NAME FORMAT| テ グル 


OPEN CLOSE INPUT= PRINT= 

SET FPOS PRINTz CSING 

LOC EOF INPCT= 
LINEINPUT= 


SKIS DSK ド OS と 二 刺 
[DSKIS DSKOS ] ララ 5 


FIELD LSET RSET 
PUT GET NAIKIS NMKSS 
MKDS CVI CVS CVD 
LOF 


と ころ に 分 類 き され る も の は , プロ グラ ム フ ァ イ 
ル , デー タフ ァイル の 双方 の ファ イル に 対し て 
共通 に 使わ れる も の で , ドラ イブ 単位 で 作用 す 
る も の も 含め て で お きま し た . プロ グラ ム フ ァ イ 
ル に 分 類 し た も の は , プロ グラ ム フ ァ イル に 対 
し て の み 使 われ る も の で す . デ ー タ ファ イル は , 
シー ケン シャ ルフ ァイル と ラン ダム ファ イル と 


に に ) 


に 区 分 きれ る の で 関数 や ステ ー ト メン ト も 2 つ 
に 分 けら れ て いま す . 本 章 を 一 通り 読め ば , こ 
の 表 を 見 る だ け で 各 ス テー トメ ント の 意味 と 使 
い ぃ 方 を 思い 出す こと が で きる よう に な る で し ょ 
2 

2.2 ファ イル 一 般 に 対し て 働く も 
の 

の 。 の 。 DKOAUODNRT 


第 1 章 で も 説明 し た よう に , mount は ディ ス 
ケッ ト の 使用 開始 の 宣言 を する コマ ンド で す . 
mount を 行なわ な いと , 以下 に 説明 する 全て の 
コマ ンド や ステ ー ト メン ト は (DSKI$ と DSKO$ 
を 除い て ) 使う こと が で きま せん . mount を 行 
な う 手 順 は 次 の と うり で す . 
1. ドラ イプ に ディ スケ ッ ト を 正しい 方 向 に 
入れ る . 
2. MOUNT コマ ンド を 入力 する . 
この と き デ ィ ス ケッ ト は , ディ スケ ッ ト 上 に 
記録 され て いる ファ イル の 配置 表 (FAT, 詳し 
(は 7 章 を 参照 ) を 読み 込む 動作 を する の で , 
必ず ディ スク ユニ ッ ト の ドラ イ プ の 中 に ディ ス 
ケッ ト が 正しく 装着 され て いな けれ ば な り ま せ 
ん . ディ スケ ッ ト が 入っ て いな く < く て も , BASIC 
は 入っ て いる つも り で 配置 表 を 読も うと し ます . 
この 時 , STOP キー は 効き ませ ん か ら , 必ず 正 
し 〈 く ディスケット を 入れ た こと を 確認 し て か ら 
mount コマ ンド を 入力 し て 下さ い . た と えば , 
ドラ イプ 1 に ディ スケ ッ ト を 入れ て mount する 
時 に は , 
mount 1 
と 入力 し ます . 複数 の ドラ イブ を MOUNT す 
る 時 に は , ドラ イブ 番号 を カン マ で 区 切っ て 指 
定 す る こと が で きま す . ドラ イブ 番号 を 省略 し 
だ た ときには , その 時 PC に つなが っ て いる 全て 
の ディ スク (2 台 ま た は 4 台 ) を mount し ます . 
この 場合 に も 。 全 て の ディ スク に ディ スケ ッ ト 
を 入れ た こと を 確認 し て 下さ い . 


づつ 避 


一 度 mount を 行なっ た な ら ば , その ディ スケ 
ッ ト は , 次 に 説明 する remove を 行なう まで は , 
ディ スク か ら 取 り 出 し て は いけ ませ ん . また 
remove を 行なわ ず に も う 一 度 mount を し よう 
と する と , Disk already mounted の エラ ー に 
な り ま す . この エラ ー が で た 時 は , それ 以前 に 
remove を し 忘れ て いる と いう こと で すか ら , 必 
ず remove を し て 下さ い . 


2。 2. 2 REMOVE 

remove は 、 mount と 逆 に ディ スケ ッ ト の 使 
用 の 終了 を 宣言 する コマ ンド で す . remove は , 
mount で メモ リ に 読み 込ん だ 配置 表 (FAT) を 
ディ スケ ッ ト に 書き 込む と いう 大 変 重要 な 仕事 
を 行ない ます か ら , ドラ イブ か ら デ ィ ス ケッ ト 
を 出す 時 に は , 必ず remove を し な く て は な り 
ませ ん .remove を し な いで と り 出 す と どう な る 
か な どの 詳し いこ と は , 7 章 を みて 下さ い . 

remove も mount と 同じ よう に , ドラ イブ の 
の 42234 目 E 和 軸 9 主 た 記 久 ば , ドラ イブ 2 に 入 
っ て いる ディ スケ ッ ト の 使用 が 終了 し て 取り 出 
し た い 時 に は , 

remove 2 
と 入力 し ます . ドラ イブ 番号 が 省略 され た 時 に 
は mount し て ある 全て の ディ スク 中 の ディ スケ 
ッ ト を remove し ます . この 時 も , BASIC は 
ディ スケ ッ ト が 入っ て いる も の と 思っ て 働き ま 
すか ら , ディ スケ ッ ト が 入っ て いる か に 注意 し 
て くだ さい . 

一 度 remove し た の ち に , その ドラ イブ に 対 
し で ヂ ディ スク コマ ンド や ステ ー ト メン ト を 実行 
する と , Disk not mounted の エラ ー に な り ま 
す . 


2. 2. 3 FILES, LFILES 
FILES コマ ンド は , ディ スケ ッ ト 中 に どん な 
ファ イル が 入っ て いる か を 表示 し ます . た と え 
ば ドラ イブ 2 に 入っ て いる ディ スケ ッ ト の 場合 


に は , FILES 2 と 入力 し ます . ドラ イブ の 指 
定 が 省略 され た 場合 に は ドラ イブ 1 と みな され 
ます . FILES の 例 を 示し まし ょ う . 


filesz 

format. 1 ba と EuP 。 1 
COPY  。 1 Prin ジ ロ .Eas 1 
[EMI .bas fdumP < 1 


test as 1 
HE 


表示 に は , ファ イル の 名 前 , 振 張子 と その フ 
ァイル の 大 き さ が 示さ れ ま す . ファ イル 名 6 文 
字 と 拡張 子 3 文字 と の 間 に は , 1 文字 分 の 間 が 
と られ , 非 ア スキ ネー 形 式 の 場合 に は ピリ オド が 
打 た れ ま す . アス キー 形式 の 場合 に は 間 は スペ 
ー ス で す . 上 の 例 で は アス キー 形式 に な っ て い 
る の は , 拡張 子 asc を 持つ ファ イル TEST だ 
け だ と いう こと が わか り ま す . 

ファ イル 名 の 右 に 表示 され る 数 字 は , その フ 
ァイル の 大 き さ を 示し ます が , この 単位 は クラ 
スタ 数 で す . クラ スタ に つい て は , 7 章 で 説明 
信 ま すら に で ば は クラスタ は 2K バ イト だ と 
いう こと だ け を 覚え て お いて 下さ い . 先ほど の 
例 で は DEMO. bas が 4K バイ ト , その 他 の 
ファ イル が 2 K バ イト の 大 き さ で ある と いう こと 
に な り ま す . 

LFILES は , FILES と 同じ 働き を を し ます が , 
その 出力 を ブリ ンタ に 対し て 行なう 点 だ けが 異 
な りほ 3 


ディ スケ ッ ト 中 に ファ イル が 存在 し な い 時 に 
は , FILES を と っ て も 何 も 表 示 は され ませ ん . 


2. 2. 4 NAME 
NAME は , ファ イル の 名 前 を つけ 変え る コマ 
ンド で す . NAME は 次 の よう に 用 いま す . 


NAME < 逢い ファ イル 名 > AS < 新しい 
ファ イル 名 > 


た と えば , NAME ABC AS XYZ” と す 
る と , ABC と いう 名 前 の ファ イル は XYZ と い 
う 名 前 に 変わ り ま す . 

ここ で ファ イル 名 の 指定 の 仕方 に つい て 説明 
し て お きま し ょ う . フ ァイル 名 の 指定 は NAME 
の 他 に も load や save,. open な どの いく つか 
の コマ ンド や ステ ー ト メン ト で も 必要 で す が , 
指定 方 法 は どれ も みな 同じ で す . 

まず 第 1 に ファ イル 名 は , 文字 型 で な けれ ば 
な り ま せん . 名 前 を “で くく る の は その た めで 
す . 文字 型 で あれ ば 文字 変数 で あっ て も か まい 
ませ ん . た と えば , NAME AS AS BS と する 
こ 必 お で きま 9 だ だ I じ 名 前 が の 2 ドリ ポン 
グ で ある 場合 に は , Bad file name の エラ ー に 
な り ま す . ファ イル 名 は 6 文字 まで で , その 後 
に ピリ オド を つけ れ ば , さら に 3 文字 まで 拡張 
子 の 指定 も 行なえ を ます . また , ドラ イブ の 指定 
も Disk BASIC で は ファ イル 名 の 指定 に 含め 
て 行ない ます . た と えば , ドラ イブ 2 の ABC と 
いう ファ イル を 指定 する に は , 

N2iOB⑥2 

と な り ま す . ドラ イブ の 指定 が 省略 され た 場合 
に は , ドラ イブ 1 が 指定 され た も の と みな され 
ます . で すか ら , 先ほど の 例 は , 正確 に いう な 
ら ば 「 ド ライ ブ 1 の ABC と いう 名 前 の ファ イル 
を ,XYZ と いう 名 前 に 変 そる 」 と いう こと に な り 
ます . も し ファ イル ABC が ドラ イブ 2 に ある な 
ら ば 、 

NAMIE 還 還 22M か AB の 2 個 半 AS 因 22 守 多 XSY26 
と し な けれ ば な り ま せん . ドラ イブ の 指定 は 新 
し い フ ァイル 名 の 方 は 省略 し て , 

NAME  \2 :ABC? AS XYZ? 

と する こと が で きま す . し か し , 次 の よう な 場 
合 に は , Rename across disks の エラ ー に な り 
ます . 

NAME “ABC? AS “2 : XYZ? 

NAMB 還 当 2 最 WBAS 下 は 二 WX9 の 6 
な ぜ な ら ば , NAME は 異な る ドラ イブ に わた っ 


に アス 


て 名 前 の 指定 が また が っ て は いけ な いか ら で す . 

また , 古い ファ イル 名 が 存在 し な い 時 に は File 
not found, 新しい ファ イル 名 が すでに 存在 し て 
いる 場合 に は File already existS の エラ ー に 
な り ま す . 

NAME は ファ イル の 名 前 を 変え る だ け で すか 
ら , ファ イル の 内 容 は 全く 変わ り ま せん . ファ 
イル を 本 に た と える な ら ば , NAME は その 書名 
を 変更 する 働き を する わけ で す . 


の 語 の の 避 。」S0P 

kil は ファ イル を 削除 する コマ ンド で , 次 の 
よう に 使い ます . 

kill < ファ イル 名 > 

KILL で は 一 度 に いく つも の ファ イル を 削除 
する こと は で きま せん . また , 書き 込み 禁止 属 
性 (SET 及 び 3 章 を 参照 ) の つけ られ た ファ イ 
ル は kill する こと は で きず , File write protected 
の エラ ー に な り ま す . 書き 込み 禁止 属性 の つい 
た ファ イル を 削除 する に は , まず SET で 属性 
を 解除 し て か ら , kil し な けれ ば な り ま せん . 

ファ イル 名 の 指定 の と き に は ドラ イブ の 指定 
に 注意 し まほ しょ う . ドラ イプ 1 と 2 に 同じ ファ 
イル が あっ て , 2 の 方 だ け を 削除 し た い 場 合 な 
ど に 指定 を 忘れ る と ,1 の 方 が 削除 され て し まい 
E3K 雇 

ki を する と , それ まで その ファ イル の 使用 
し て いた ディ スケ ッ ト 上 の 領域 が 解放 ほれ て 他 
の ファ イル を 作る の に 使え る よう に な り ま す . 


の の (OUDSDK9g 
DSKF は , ディ スク の 未 使用 領域 の 大 き さ を 
値 と する 関数 で す . ちょ うど FRE の ディ スク 
版 に あたる 関数 で , 値 は クラ スタ 単位 で す . DSKEF 
を 使っ て , ki に よっ て ファ イル の 使用 し て い 
た 領 城 が 解放 きれ る こと を 確認 し て み ま し ょ う . 


fi]les2 
format。 1 ba と EpP 。 1 
COP ツ  。 1 Pr1in2 ニ 。bas 1 


HEMI  .has fdumpP 。 1 


test asc 1 

ロ ド 

Print ds ド f(Z) 
4 


ik 
ki11 リ "SihHEMH.bas" 
nk 
Print skf(2) 
22 上 SDH ATTRS 
ファ イル に は 属性 を つけ られ る こと を KILL 
の と ころ で ほのめかし まし た が , SET は その た 
め の も の で す . 属性 に つい て は 3 章 で も 触れ ま 
す が , 書き 込み 禁止 と リー ド ・ ア フタ ・ ラ イト 
の 2 種類 が あり, SET を 使っ て 次 の よう に し て 
つけ ます . 
SET < ファ イル 名 >, < 属性 > 
属性 は P (書き 込み 禁止 ) と R (リー ド ・ ア 
ZZ: 2 有 ト ) で 表わし て 指定 し ます . この 指 
定 は 必ず 大 文字 で , また 文字 型 に な る よう に ? 
で くく ら ね ば な り ま せん . 
SN 半 還 B( ら 0 詳 DP ん 
この 例 で は ファ イル ABC に 書き 込み 禁止 属性 
が つけ られ ます . save や open に よっ て 作ら れ 
た ば か り の ファ イル に は 属性 は 何 も つ いて ませ 
ん か ら , 必要 な ら ば SET で 属性 を つけ ます . 
属性 に P と R 以 外 を 指定 する と それ まで つい て い 
た 属性 は 解除 る され ます . 一 度 フ ァイル に 属性 を 
つけ る と その 解除 か 変更 を 行なう まで 変わ る こ 
と は あり ませ ん . 
ATTR$ は ファ イル に どん な 属性 が つい て い 
る か を 調べ る た め の 関 数 で す . 値 は 3 文字 の 文 
字 列 で 与え られ , 属性 が 無い と き に は , スペ ー 
ス 3 つか ら 成 る 文字 列 を 与え ます . 


set WEitest.as に "テリ "PF" 

ロ ド 

Print attr$ ま ("itest。&sS こ " ) 
F 

HE 


紀 昌 


2. 2. 8 FORMAT 
市 販 の ディ スケ ッ ト を 買っ て き て PC て 使 お 
うと 思っ て も , その まま で は 使う こと が で きま 
ぴん 。 これ は ョ ディ イズ ケッ ツ ト の アラ ォ ー マ ッ トド ト が 
PC の 便 う 型式 と 異な る た めで す . (フォ ー マ ッ 


ト に つい て は 6 章 参照 ) こ れ を , PC の 使え る フ 
ォ ー マ ッ ト に 変更 する の が FORMAT 文 で す . 


FORMAT 文 は 次 の 型式 で 用 いま す . 
FORKMAT < ドラ イブ 番号 > 

FORMAT 文 を 実行 する と , 指定 し た ドラ イブ 
に 入っ て いる ディ スケ ッ ト が フォ ー マ ッ ティ ン 
グ さ れ ま す が , その デー タ は 失 な われ て し まい 
ます か ら 注 意 し て 下さ い . 市 販 の ディ スケ ッ ト 
は FORMAT 文 を 実行 し た だ け で は , ディ スク 
BASIC で 使う こと は で きま せん . FORMAT 文 
は その 下 準 備 を する だ け な の で す . 実際 に Disk 
BASIC で 使え を る よう に する に は , シス テム ・ デ 
ィ ス ケッ ト 中 の FORMAT プロ グラ ム を RUN 
させ る 必要 が あり ます . この FORMAT プロ グ 
ラム は , その 中 で FORMAT 文 を 実行 し て くれ 
る の で , 市 販 の ディ スケ ッ ト を 買っ て きた な ら 
ば , FORMAT プロ グラ ム を 実行 する だ け で 充 
の iCG9 


283 直 22 ログ ラム ファ イル に 放 し て 
働く も の 

の 二 961 下 ISAWB 

SAVE は , プロ グラ ム を ディ スク に 保存 する 
命令 で す . ちょ うど カセ ッ ト テ ー プ ブ の CSAVE 
と 同じ で す . SAVE に は , アス キー 形式 と 非 ア 
スキ ー 形 式 が ある こと は 1 章 で も 説明 まし た . 
それ ぞ れ の 場合 の SAVE の し か た は 次 の よ うに 
な り ま す . 
アス キー 形式 の と き : SAVE < ファ イル 名 >, a 
非 ア スキ ー 形 式 の と き : SAVE < ファ イル 名 > 
指定 され た 名 前 の ファ イル が すでに 存在 する 
場合 に は , 自動 的 に その ファ イル を 削除 し て か 
ら セ ー ブ を 行なう よう に な っ て いま すか ら 名 前 


コ 紀 


の 指定 に は 注意 し て くだ さい . 

ディ スケ ッ ト に プロ グラ ム を セー プ ブ す る た だ た め 
の あき 領域 が 足り な か っ た 場合 に は Disk full の 
エラ ー に な り ま すこ の エラ ー が 出 た な らい ば, 
不 必要 な ファ イル を kil する か , プロ グラ ム を 
短く する か し て save し 直さ なけ れ ば な り ま せ 
ん . それで も だ め な ら , 別 の ディ スケ ッ ト に Save 
すら 、 届 作 20 ま お 


2。 3 =25 PE の OAD 

SAVE に より ディ スク に 作っ た ブロ グラ メ アウ 
ァイル を メモ リ 中 に ロー ド (読み 出し ) し ます ., 

load < ファ イル 名 > 
SAVE の 時 に は ,、 アス キー 形式 か み 非 アス キー 形 
式 か に よっ て ファ イル 名 の 後に A を 付け まし た が , 
1oad で は ロー ド す る ファ イル 形式 の いか ん に か 
か わら ず フ ァイル 名 の 指定 どけ で よい の で す . 
な ぜ な ら ば BASIC が ファ イル の 形式 に 応じ た 
ロー ド を 自動 的 に 行なっ て くれ る か ら で す . 

load を 実行 する と, その 時 メモ リ 中 に 入っ て 
いた プロ グラ ム や 変数 は 全て 失 な われ て , 指定 
し た プロ グラ ム フ ァ イル が 入り ます . す な わ ち , 
new と プロ グラ ム の ロー ド の 2 つの 仕事 を する 
わけ で す . また load を する と , その 時 点 で オ 
ー プ ン さ れ て いた ファ イル は 全て クロ ー ズ され 
て し まい ます . この 事 に つい て は , CLOSE 文 の 
と ころ で 詳し く ふ れ ま す . 

load に は R オ プシ ョ ン 付 ほ き の 

1oad < ファ イル 名 >, R 

と いう 型式 が あり ます が , これ は 

run < ファ イル 名 >,R 

と 全く 同じ で す の で 次 の RUN の と ころ で 説明 
孤 E3 頃 計 の 8 

1oad は プロ グラ ム フ ァ イル を ロー ド す る た め 
の も の で す . 指定 され た ファ イル が デー タフ ァ 
イル で あっ た 場合 に は その 動作 は 保証 され な い 
の で 注意 し て 下さ い . 


Nm ニーーーー 和 ーー ダ 


2 た 語 3 で 語 3 還 RWN 

Disk BASIC で は , RUN で ファ イル 名 の 指 
定 を 行なう こと が で きま す . 

run < ファ イル 名 > 
この 動作 は 。 まず ファ イル を ロー ド し て , 最初 
の 行か ら 実 行 を 始め る の と 同じ で す の で 

load < ファ イル 名 > 

run 


と 等 し いこ と に な り ま す . 実行 を 開始 する 行 の 
指定 は 行なえ を ませ ん . また load と 同じ よう に , 
それ まで メモ リ 中 に あっ た プロ グラ ム で 変数 は 
失 な われ て し まい ます し , オー プン され て いた 
ファ イル は 全て クロ ー ズ され ます . 但し 次 に 述 
べ る R オ プシ ョ ン 付 き の 場 合 に は , ファ イル の ク 
ロー ズ は 行なわ れ ま せん . 

R オ プシ ョ ン 付 ほ き の RUN と は 決 の 型式 で す . 
< ファ イル 名 >, R 

動作 は ほとん ど 同 じ で , ファ イル が クロ ー ズ さ 
れ な い 点 だ けが 異な り ま す . 

この KR オプ ショ ン は プロ グラ ム の チェ イン を 行 
な う の に 用 いら れ ま す . 具体 例 は 4 章 で 示し ま 
す が , 手 知 か に は 次 の よう な こと に な り ま す . 
ディ スク の 特長 は 記憶 容量 が 大 きい 事 で し た 
か ら , メモリ に は いり きれ な いよ うな 大 き な プ 
ログ ラム で も 。, 実行 に 必要 な 部 分 だ け を LOAD 
し て プロ グラ ム 全 体 の 実行 し て いく こと が で き 
れ ば , ブロ グラ ム 全 体 を 処理 が 可能 と な り ま す . 
その た め に は , プロ グラ ム を いく つか の モジ ュ 
ー ル に 分 け て , 各々 を プロ グラ ム フ ァ イル と し 
て お きま す . 各 モ ジュ ー ル の 最後 に は load ま 
た は run を KR オプ ショ ン 付 ほ き で 用 いる こと に よ 
り , 次 の モジ ュー ル に 制御 を 移す よう に する の 


5G9 記 

run"fjle17 file 
RUN"file2?RR 
file 2 
RUNfile 3" R 


TUi1 


4 ロ 


この よう に , チェ イン は ファ イル へ の GOTO 

に 相当 する も の で す . ファ イル が ロー ド さ れる 

前 の プロ グラ ム は NEW され て し まい ます か ら 

各 モ ジュ ー ル の 行 番 号 が 衝突 し て も か まい ませ 

ん . し か し , ファ イル へ の GOSUB の よう な こ 

と は で き な い こと に な り ま す . また NEW に ょ 

り 変数 の 値 が 失 な われ て し まい ます か ら , モジ 

ュー ル 間 で の デー タ の 受け 渡し を 行なう に は 工 

夫 が 必要 と な り ま す . この 方 法 と し て は 次 の 3 

つが 考え られ る で し ょ う . 

1 . BASIC で 使用 する メモ リ の 上 限 を CLEAR 
文 で 制限 し て お き , それ 以降 の メモ リ 空間 に 
PEEK, POKE する こと に より 受け 渡し を 行 
7262 お 

2 . デー タ を 受け 渡す た め の フ ァイル を 準備 し 
て お き , その ファ イル を 介し て 受け 渡し を 行 
2 の 

3. ファ イル の 使用 する バッ ファ を 利用 し て デ 
ー タ の 受け 渡し を 行なう . 

1 と 3 の 方 法 は , NEW され る こと に より , 
値 の 失 な われ る こと の な い メ モリ 空間 を 使 お う 
と いう 方 法 で す . それ に 対し 2 の 方 法 は , 値 の 
失 な われ る こと の な い フ ァイル を 使 お うと いう 
も の で す . ファ イル と し て シー ケン シャ ルフ ァ 
イル を 使う 場合 に は 、 フ ァイル を 先頭 か ら 読み 
直 き ね ば な ら な いた め に , 引き 渡す 側 の クロ ー 
ズ と 受け 取る 側 の OPEN が 必要 と な り ま す が , 
ラン ダム ファ イル を 使う 場合 に は , ファ イル が 
オー プン され だ た まま に な り ま すか ら そ の 必要 が 
な く な り ま す . た と えば 変数 A と B の 値 を PROG 
1 か ら PROG 2 に 渡す に は 次 の よう に な る で し ょ 

の 


ji) シー ケン シャ ル ファ イル の 場合 
10 REM PROG 1 
20 OPEN PERM?7 FOR OUTPUTAS # 
1 
25 馬 UNIBIUUAI 二 誠 A 二 B 


30 PRINT 拓 , A, B 

40 CLOSE 折 

50 RUN PROG 2?、R 

10 REM PROG 2 

20 OPEN PERM′ FOR INPUT AS 
打 


30 INPUT H, AB 
40 PRINT AB 

45 CLOSE 

50 END 


ii ) ラン ダム ファ イル の 場合 

REM PROG 1 

FIELD 抽 , 4 ASA$, 4AS B$ 
OPEN "PERM′ AS 折 
NEUiN AB 

LSET A$=MKS$ (A) 

LSET B$=MKS$ (B) 

0 了 計 | 

RUN "PROG 2?,R 


10 
20 
30 
40 
50 
60 
70 
80 


REM PROG 2 
FIELD 打 , 4 AS A$, 4 AS BS$ 
(GS 生還 


PRINT CVS (A$), CVS (B$) 
CLOSE 


END 


10 
20 
30 


40 
50 


60 


この 例 で は , まだ 説明 し て いな い ス テー トメ 
ント が いく つも で て きま し た が これ ら に つい て 
は 2. 4 節 で 触れ ます . 受け 渡し の 方 法 の 1 と 
3 に つい て は , 3 章 以 降 で 説明 され る で し ょ う . 


2. 3. 4 MERGE 
プロ グラ ム の チェ イン で は , 1 つの プロ グラ 
ム を い 〈《 つ か の モジ ュー ル に 分 解す る こと を 考 


作 1 


えま し た が , MERGE は これ と 逆 に いく つか の 
モジ ュー ル を まとめ て 1 つの プロ グラ ム を 作る 
の に 使い ます . 頻 築 に 使用 する よう な サ プ ブルー 
ナン 等 は 。 ラ イブ ラリ と し < ブロ グラ バン アイ 
ル を 作っ て お き , 必要 と な っ た と き に , MERGE 
に より メイ ンプ ログ ラム と 結合 を 行なう の で す . 
本 書 で は プロ グラ ム の 実行 結果 を プリ ンタ に 出 
カカ し て いま す が , どの よう に し て 出力 させ て い 
る か と いう と スク リー ン の 内 容 を プリ ンタ に 出 
力 す る プロ グラ ム を 1 つ 作 っ て お まき, 実行 例 を 
示 が きき 代 は 表 だ の ウジ ログ シンド と ジイ ション ロリ 
ラム と を MERGE し て 実行 きせ て いる の で す . 
MERGE は ,。 この よう に し て , メモ リ 中 に あ 
る ブロ グラ ラム と 。 ブ ログ ウフ ア イツ と を = 諸 
に し て 1 つの プロ グラ ム と し ます 。 使い 方 は 次 
の と お り で す . 
MERGE < ファ イル 名 > 

MERGE す る ファ イル は アス キー 型式 で な けれ 
ば な り ま せん . 非 ア スキ ー 型 式 の と き に は Bad 
file mode の エラ ー に な り ま す . また チェ イン 
の 時 と 異な り , メモ リ 中 の プロ グラ ム と 指定 す 
る ファ イル 中 の プロ グラ ム に は 同一 の 行 番号 が 
な いよ うに し な けれ ば な り ま せん . 同一 の 行 番 
号 が あっ た 時 に は , ファ イル の 方 の も の が 入り 
ます . つま り , MERGE の 動作 は , 指定 し た フ 
ァイル 中 の プロ グラ ム を PC が タイ プ し て くれ 
る と 考え れ ば 良い で し ょ う . 

MERGE で は メモ リ 中 の プロ グラ ム と ファ イ 
ル 中 の プロ グラ ム と の 2 つの 結合 し か 行なえ ま 
せん か ら , 3 つ 以 上 の モジ ュー ル の 結合 を 行 な 
うに は , MERGE を 複数 回 用 いま す . 行 番号 の 
衝突 の 問題 を 避け る に は , ライ ブラ リ と し て フ 
ァイル に し て お く プ ログ ラム は , 大 き な 行 番号 
(た と えば 1000) か ら 始ま る よう に し て お き 。, 
MERGE し た な ら ば RENUM する よう に し れ 
ば 良い で し ょ う . MERGE し た 結果 は メモ リ 上 


に で きる こと に も 注意 し て 下さ い . 何 度 も 続け 
て 大 き な フ ァイル を MERGE し て いる と メモ リ 
が 足り な く な り ま す . プロ グラ ム 間 の 変数 名 の 
衝突 に も 注意 し て 下さ い . 


2.4 デー タ ファ イル に 対し て 働 
くも の 
2. 4 1 OPEN 


デー タフ ァイル を 使う に は , その ファ イル を 
参照 する 前 に その 使用 の 開始 宣言 が 必要 で す . 
レレ 27 の レク ンド に 7 た 7 生 の ちん 2 の と フン 
ク は , 本 が た くさ ん 入っ て いる 図書 館 の よ う 2 
も の で す .。 あな た は , 座席 に すわ っ て いて , 見 
た い 本 が あれ ば BASIC に その 本 を 持っ て 来 て 
くれ る よう に 頼む わけ で す . OPEN 文 は に の よ 
うに ディ スケ ッ ト か ら あ な た の 注文 し た ファ イ 
ル を 探し 出し て くれ る 働き を し ます . OPEN を 
し て 初め て 、 あ な た は その ファ イル を 参照 する 
こと が で きる よう に な る の で す . 

この 図書 館 は 少々 変わ っ て お り , 本 を 読む だ 
で は な く 〈, 本 に 書き 込み を する こと も 許し て < 
れ ま す . また , 新しく 本 を 作る こと も で きま す . 
詳し い 注文 の し か た (OPEN 文 の 使い 方 ) に つ 
いて は 2・5 節 と 2・6 節 で 説明 し まし ょ う . 

ここ で は , この 図書 館 の 貸し 出し 規則 に つい 
て 述べ て お きま す . 注文 に よっ て BASIC は ぁ 
な た の 机 ま で 本 を 持っ て き て くれ ます . また , 
本 を 作る と き に は , 表紙 だ け で 内 容 は 白紙 の 本 
を 持っ て き て くれ る と 思っ て くだ さい . 机 に は 
広 さ の 制限 が ある の で , 一 度 に 借り 出せ る 本 の 
丈 数 は 制限 され ます . この 制限 は , あな た が 
机 の 大 ほ き さ を あら か じ め 予 約 し た と き に 決ま り 
ます . すなわち , 大 き な 机 を 予約 し て お け ば , 
それ だ け 多 く の 本 を 広げ る こと が で きま す が , 
小さ な 机 で は , そん な に 多く の 本 は 無理 で す . 
また だ た, 準備 る され て いる 机 で 最も 大 きい も の は , 


に , 質問 し て くる , “How many files( 0 -15) ? ? 
に どう 答え る か に よっ て な され ます . 
15 と 答え て いれ ば 15 冊 まで 借り られ ます が , 0 
と 答え た 人 に は 1 冊 も 貸し て くれ ませ ん . 


この 時 に 


の 。 4 。 琶 2 上 OK39 
OPEN は 本 の 借り 出し に 相当 する も の で し た 


が , CLOSE は 返却 に 相当 する も の で す . 実際 の 
返却 手続 き (CLOSE 文 の 使い 方 ) に つい て は 後 
で 述べ ます が , 借り た 本 は 必ず 返さ な けれ ば な 


り ま せん . いつ まで も 返却 を 忘れ て いる と 名 制 


的 に 取り 返さ れ て し まい ます (自動 的 に CLOSE 


され る ). Disk BASIC が この よう な 手段 に で 
る の は 湊 の 場合 で す . 


END 文 」NEW を 実行 し た と き . 

。 ブロ グラ ム の 文面 に 変更 を 加え だ とき. 
. REMOVE を 実行 し た と き 

。FRUN, LOAD を 実行 し た と まき . 


心 。 CO トド つう 過 


Mae 説明 たよ うに, KR オプ ショ ン 付 
き の run, load の 時 に は CLOSE は 行なわ れ 
ませ ん . 

CLOSE に よっ て 返却 を お こ な う と, その 分 だ 
け 机 の 上 が 広く な る の で , また OPEN に よっ て 
列 の 本 を 借り て くる こと が で きる よう に な り ま 
す . で すか ら , 最低 一 冊 分 の スペ ー ス が あれ ば 
借り 出し と 返却 (OPEN と CLOSE) を くり 返 
すこ と に より , 何 民 も の 本 (いく つも の ファ イ 
ル ) に 対し て 読み 書き が 行なえ を る こと に な り ま 
す . し か し , 一 度 に 何 民 も の 本 を 広げ た り , 一 
民 の 本 の 内 容 を 別 の 本 に 書き 移し た りす る た め 
に は , 一 冊 分 の スペ ー ス で は 足り な いこ と に な 
り ) 82S 鹿 

本 の 返却 手続 き (CLOSE 文 の 使い 方 ) と し て 
は , 本 の 置い て ある 場所 を 指定 し ます . つま り , 


「 そ こ に 置い て ある 本 返し て き て よ .」 と BASIC 
に 頼む わけ で す . OPEN の と ころ で は 説明 し ま 


15 可 ま で の 本 を 広げ られ る よう に な っ て いま す . 
この 予約 は , Disk BASIC を スタ ー ト させ た 時 


己 


せん で し た が , 借り 出す と き に も , "こう ぃ いう 題 
名 の 本 を も っ て き て 机 の この 位置 に お いて くれ . ? 
と いう よう に 場所 を 指定 し な けれ ば な り ま せん . 
OPEN し て か ら CLOSE する まで の 間 , その 
本 の 置い て ある 場所 を 変 0 る こと は , で きま せ 
ん . また , 本 を 読ん だ り 書 いた りす る 時 に は , 
この 位置 を 指定 する こと に な り ま す . 場所 の 指 
定 は 番号 で 行ない ます . すなわち , 机 の 上 に 線 
が 引い て あっ て 本 を 置く 場所 が 区 切ら れ て お り , 
各区 画 に は 番号 が ふっ て ある と 思え ば よい で し 
0 

結局 CLOSE 文 の 使い 方 は 次 の よう に な り ま 
2 応 


「 1 番 の と ころ に ある 本 を 返し て 下さ い . 」 
CLOSE # 1 また は , CLOSE 1 


1 度 に 何 民 も の 本 を 返す こと も で きま す . 

「 1 番 と 2 番 の と ころ に ある 本 を 返し て 下さ 
My 二 ] 

CLOSE 抽 , 対 また は CLOSE 1,2 


握 号 は あっ て も , 無く て も か まい ませ ん . 
番号 の 指定 を し な いと 机 の 上 に あっ た 全て の 本 
(ファ イル ) を 片づけ られ て し まい ます . 
この 番号 の こと を , ファ イル 番号 と 呼び ます . 


2 還 243 議 ASEH 

SET は 2。 2 節 で も で て きま し た が , ここ で 
再び の 登場 で す . 2 度 も で て くる の は その 使わ 
れ 方 が 異な る た めで す . 2. 2 節 の SET は フ 
ァイル に 属性 を つけ る も の で , いわ ば 本 その も 
の に 対し て 書き 込み 禁止 の ラベ ル を つけ る も の 
で し た . ここ で 説明 する の は , SET の も う ) 1 つ 
の 使い 方 で 、 フ ァイル 番号 すなわち 机上 の 場所 
を 指定 し ます . 

SET < ファ イル 番号 〉, < 属性 > 

た と えば SET 抽 ,『P? は ,「 1 番 の 場所 に 


3 


ある 本 に 対し て は 書き 込み を 禁止 する よう に す 
る 」 と いう 働き に な り ま す ., 注意 し な けれ ば な 
らち ない の は , 本 (ファ イル ) に 属性 が つく の で 
は な く , 場所 (ファ イル 番号 ) に 属性 が つく の 
だ と いう こと で す . 今 1 番 に P 属 性 が つい て いる 
と , そこ の 本 を CLOSE に より 返却 し て も 。 そ 
の 本 に 書き 込み 禁止 の ラベ ル が 貼ら れる わけ で 
は あり ませ ん . この SET で は 指定 し た ファ イ 
ル 番 号 の ファ イル は オー プン され て いな けれ ば 
な り ま せん . また , SET され だ 属性 は CLOSE 
する と 解除 され て し まい ます . 


2。 BBOS 
FPOS は ファ イル が ディ スケ ッ ト 上 の どの 場 
所 に ある か を 知ら せ て くれ る 関数 で す . この 関 
数 は , 普通 使わ な いも の な の で , ここ で は 使い 
方 と 注意 だ け を 示し ます . 詳し く は 7 章 で も う 
一 度 触れ ます . 
FPOS は 次 の よう に し て 用 いま す . 


FPOS < ファ イル 番号 > 


返さ れる 値 は 、 トラ ッ ク 0 の セク タ 1 を 0 と す 
る 通し の 番号 で す . いわ ば 本 が 本 棚 の どこ に し 
まっ て ある か を 教え て くれ る よう な 関数 で す . 
FPOS の 返す 値 を F で 表 わ せ ば , ト ラック 番号 
と セク タ の 番号 S は 次 の よう に し て 求め られ ます . 


=F 壮 16:S=F mod 16 二 1 


注意 し な けれ ば な ら な い の は , FPOS の 返す 
値 は ファ イル が オー プン され て いる 間 だ け 有 
効 だ と いう こと で す . また , OPEN し た 直後 の 
FPOS の 値 は 。 その ファ イル の 入っ て いた 最初 
の 位置 を 示し ます が , 1 度 で も ディ スク へ の ア 
クセ ス が 行なわ れる と 値 は 変化 し ます . この 値 
は , 湊 に アク セス する べき ディ スク 上 の 位置 を 
示す も の な の で す . 詳 し く は 7 章 を みて 下さ い . 


また , FPOS は 指定 し た ファ イル が どの ディ ス 
ク に 入っ て いる か は 教え る で くれ な いこ と に も 注 
意 し で 〈 く ださい. 


の 。 4。 5 1BO6 
LOC は FPOS の 親類 の 関数 で , 次 に 読み 書き 
する レコ ー ド の 値 を 返す も の で す . LOC の 示す 
レコ ー ド の ある 場所 を 与え を る の が FPOS に あ た 
る の で す . LOC の 詳し い 説明 を する に は 
まで は 知識 不足 な の で 2. 
ああ し 説 3 


ーー 
っ こつ 


6 節 及 び 3 章 に 譲る 


9 ジン ニク ョ ンジ ショ ャ クレ 詞 ジ ルイ 人 W 六 に 
対し て 働く も の 

ここ で は , シー ケン シャ ルフ ァイル の 操作 に 
用 いる ステ ー ト メン ト や 関数 に つい て 説明 し ま 
す . シー ケン シャ ルフ ァイル に つい て の お さら 
い を し て お いて くだ さい . 


の 。 5。 )U OSN 
シー ケン シャ ルフ ァイル は 本 に た と えて いう 
な ら ば 巻物 に 相当 し ます . 着 物 を 持っ て 来 て も 
ら う (OPEN する ) 場合 に は 3 種類 の 注文 の 仕 
方 が あり ます . 


1. OPEN < ファ イル 名 > FOR INPUT AS 
く フ ァイル 番号 > 

巻物 < ファ イル > を 読む 場合 の 注文 の 仕方 を 
決め る 命令 で す . これ を 行なう と BASIC は , 
指定 し た 題名 (ファ イル 名 ) の 巻物 を 探し 。 指 
定 し た 場所 (ファ イル 番号 ) へ 持っ て き て くれ 
ます . 指定 し た ファ イル が 存在 し な い 場 合 に は 
File not founnd の エラ ー に な り ま す . 


2. OPEN < ファ イル 名 > FOR OUTPUT 


AS < ファ イル 番号 > 
新しく 巻物 を 作る 場合 の 注文 の 仕方 を 決め ま 


す . BASIC は 指定 し た 題名 と 同じ 題名 の 巻物 が 


2 


あっ た 場合 に は , それ を 廃棄 (KILL) し て か ら 
中 身 が 白紙 の 巻物 を 用 意 し て くれ ます . 同じ 題 
名 の 場合 に は , 白紙 の 巻物 を 用 意 し て くれ る だ 
け で す . 用 意 さ れ た 着物 は 指定 し た 場所 (ファ 
イル 番号 ) に 置か れ ま す . 


3 OPEN < ファ イル 名 > 
AS < ファ イル 番号 > 

ファ イル に 対し て 書き 足し を する 時 の 注文 の 
仕方 で す . BASIC は ファ イル を 探し て き て その 
終り の 部 分 を 広げ て , あな た が すぐ に 書き 足し 
を で きる よう に 準備 し て くれ ます . 指定 し た フ 
ァイル が 存在 し な い 場 合 に は File not found の 
デジ ョ に な りり ます 。 

この よう に INPUT, OUTPUT, APPEND 
の 3 つの 注文 の 仕方 が あり ます が , こら れ を 
OPEN の モー ド の 指定 と 呼び ます . モー ド が 省 
略 さ れ だ 時 に は , ファ イル が 存在 すれ ば INPUT 
の 場合 と 同じ 動作 , 存在 し な ぃ い 場合 に は 
OUTPUT の 場合 と 同じ 動作 に な り ま 95 

モー ド の 指定 は , その ファ イル に 対し て 書き 
込み を 行なう か , 読み 出し を 行なう か の 宣言 で 
すか ら , 以後 は それ に 従 が の わ ね ば な り ま せん . 
OUTPUT 及び APPEND の 場合 に は 着目 し て 
いる 部 分 が ファ イル の 終り に あたる わけ で すか 
ら , 読も うと し て も , そこ に は 何 も 書 か れ て い 
な いた だ ため に , Input past end の エラ ー に な り 
ます . INPUT の モー ド に 指定 し た 場合 に は , 
その ファ イル に 対す る 書き 込み を 行なっ て も , 
BASIC は 何 の エ ラー も 出し ませ ん . し か し , こ 
れ は エチ ケッ ト 違 反 で あり , その 動作 は 保証 さ 
れ ま せん . ファ イル に 少々 の デー タ を 書い て か 
ら CLOSE し て も 実際 に は 書き 込み を し な か っ 
たり , ある 程度 以上 を 書く と 実際 に 書き 込み を 
行なっ て も と の 内 容 を 破壊 する こと に な り ま す . 
INPUT の モー ド で OPEN し た 場合 に は この 
よう な 危険 性 が 伴 な いま すか ら , OPEN し た な 
ら ば , SET で その ファ イル 番号 に は P 属 性 を つ 


FOR APPEND 


ける こと を 心がけ る と 良い で し ょ う . 

一 度 OPEN し た な ら ば , CLOSE する まで 
は , 同じ ファ イル 番号 を 使っ て , ファ イル の OPEN 
を 行 な お うと する と File already open の エラ 
ー に な り ま す . し か し , 同一 の ファ イル を 異な 
る 場所 (ファ イル 番号 ) で OPEN する こと は で 
きま す . (これ は INPUT の モー ド の 時 だ け で 
す ) 


2 た 552 ド PRIN 

シー ケン シャ ルフ ァイル の 書き 込み を 行なう 
に は PRINT# を 次 の 型式 で 用 いま す . 

PRINT # < ファ イル 番号 >, < 式 の 並び > 

例え ば 変数 A の 値 を 1 番 の ファ イル に 書き 込 
む に は PRINT 打 ,A と し ます . ファ イル 番号 
が ー 1 の 場合 は カセ ッ ト へ の 出力 に あたり ます . 
この よう に 書式 は いた っ て 簡単 な の で す が , デ 
ィ ス ク を 効率 良く 使っ た り , 文字 列 を 書き 込む 
場合 に は いろ いろ と 細か い 注 意 が 必要 と な り ま 
す . それ ら に つい て は , 具体 例 を 示し て 3 章 で 
くわ し く 説 明 し ます . ここ で は , PRINT# は , 
PRINT 文 で 画面 に 表示 する の と 全く 同じ よう 
に ファ イル に 対し て 書き 込む の だ と いう こと を 
覚え て お いて 下さ い . 

PRINT# を 使う に は , 指定 され た ファ イル は 
オー プン され て いな けれ ば な り ま せん . また , 
INPUT の モー ド で OPEN し た ファ イル に 対 
し て PRINT# で 書き 込ん だ 場合 に は 実際 に 書き 
込み の 行なわ れ な い 場 合 も ある の で 注意 が 必要 
で す . (INPUT の モー ド で OPEN し た ファ イ 
ル に 対し て 書き 込み を 行なっ て は な ら な いと 考 
えて 下さ い ) 


2. 5. 3 INPUT# 

シー ケン シャ ルフ ァイル か ら の 読み 込み を 行 
な う の が INPUT# で す . つま り , PRINT# で 
書か れ た デー タ を 読む こと に な り ま す . 
INPUT# は 決 の 型式 で 用 いま す . 


INPUT# < ファ イル 番号 >, < 変数 の 並び > フ 
ァイル 番号 が 一 1 の と き に は , カセ ッ ト か ら の 
入力 に な り ま す . 簡単 な 例 で INPUT# の 動作 
に つい て 説明 を し て お きま し ょ う . 


] jst 

10 ロ FEN "test" FR ロ LITFLUIT AS 持 1 
2O FRHNT 1)1) 

SO ELOSE #1 

40 ロ PEN "test" FIR INPLIT AS #1 
5O_ INFLUT #17A7B ビ 

60 CLOSE #1 

70 FRINT AB ヵ に 

0 ENII 


INPUT# を 使う に は , それ 以前 に 読み 込み を 
行なう ファ イル が INPUT の モー ド で オー プン 
され て いる こと か 必要 で す . 例 で は , 10 行 か ら 
30 行 で 作ら れ た ファ イル test を オー プン し て い 
ます 。 フ ァイル test に は 数 字 1。 2』 3 が こと 
の 順番 で 書か れ て いま す が , 40 行 以下 で その こ 
と を 確か め て みた と いう わけ で す . 40 行 で は 
CLOSE し た ば か り の ファ イル を OPEN し て 
いる の で す が , こう し な いと ファ イル の デー タ 
は 読め ませ ん . この こと に つい て , 説明 を し て 
お さま RI 

OPEN, CLOSE の 説明 で は シー ケン シャ ルフ 
ァイル を 巻物 に た と えて 説明 し まし た が , PRINT# 
と INPUT# の 働き を 説明 する た め , カメ ラ の フ 
ィ ル ム に 置き 換え て 説明 する こと に し まし ょ う . 
どちら も 巻物 と いう イメ ー ジ が シー ケン シ 
ャ ル な ファ イル と いう こと を 意味 し ます . 

10 行 の OUTPUT モー ド の OPEN は , これ 
か ら 書 き 込 み を 行なう と いう こと で すか ら , 新 
し い 何 も 撮っ て いな い フ ィ ル ム を セッ ト す る こ 
と に た と える こと が で きま す . 20 行 で の PRINT# 
は , この フィ フ ム に 1, 2, 3 の 値 を 写す ( 書 
き 込 むせ) こと に な る の で す が , フィ ルム 1 枚 に 


の ! こ 


は 1 つの 値 し か 写せ な いと 思っ て 下さ い . ま た だ た, 
シャ ッ タ ー を 押し て 値 を 写す と , 最近 の モー タ 
ー ド ライ ブ プ の カメ ラ の よう に フィ ルム は 自動 的 
に 巻き 上 げ ら れる と し まし ょ う . し た が っ 20 
行 の PRINT# の 動作 は 次 の よう に な り ま す . 


1N 計 ン ジッ クム 5 の | 和 0 全 60839 
2。 シャ ッ タ クー を 押し <q 詳 2 清 る お 97。 
3 生 シ ャ ッ ク ニ を 押し 3 捕る 与 7 


この よう に フィ ルム に は 1, 2, 3 の 値 が こ 
の 順番 で 写 さ れ た こと に な り ま す . さて , こう 
し て 写 さ れ た 値 を 読む た め に は , フィ ルム を 巻 
き 戻 す 必要 が あり ます . シャ ッ タ ー を 押す と 同 
時 に フィ ルム は 若き 取ら れ て いま すか ら , 1 番 
最後 に 撮っ た 値 す ら 読め ない の で す . 40 行 の 
OPEN は , まさ に この フィ ルム の 巻 戻し に 相当 
し ます . INPUT の モー ド と いう こと は 。 フィ 
ルム の 最初 の コマ が 写し 出さ れる こと だ と 考え 
れ ば 良い で し ょ う . 50 行 の INPUTH# 文 は こう し 
て 写し 出さ れ た 値 を 読み 取る 働き を する こと に 
な り ま す . まず 1 を 読み 取り A に し まい ます . 
読み 取る と 同時 に フィ ルム は 巻き 上 げ ら れる と 
思っ て 下さ い . A の 決 に は B に も 読み 込ん で 
欲し いと いう 要請 が ある の で 今 出 し て いる 値 2 
を 読み 取り , B に し まい ます . 同様 に し て 3 が 
読み と られ C に し まわ れ ま す , この よう に , シ 
ー ケ ン シ ャ ルフ ァイル は 書か れ た 順番 で し か , 
読む こと の で き な い も の で す . さて , ここ で 3 
の 値 を 読み 取っ た 後 の フ ィ ル ム の 状態 に つい て 
注意 し て 下さ い . 3 を 読み 取っ た 後 。 フィ ルム 
は 巻き 取ら れ て いま す が , そこ に は 何 も 写 っ て 
いな い は ず で す . な ぜ な ら ば , 20 行 の プリ ント 
文 で は 1, 2.3 の 3 つ し か 写し て いな いか ら で 
す . この 何 も 写 され て いな い コ マ を 読も うと す 
る と エラ ー に な り ま す . 50 行 を 次 の よう に 変更 
し て 確 め て み ま し ょ う ., 
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SO INFLT #1)A7B,E7H 
Fun 

InPut past end in 50 
ロ ド 


D の 値 を 読も うと する 時 に 何 も な い の で エラ 
ー と な っ た の で す . これ は ちょ うど , READ 文 
で DATA 文 の デー タ を 読む と き に Out of data 
の エラ ー が で る 場合 と 同じ で す . 一 般 に ファ イ 
ル の デー タ を 読む 場合 に は , その ファ イル の 大 
き さ が 未知 で ある こと が 多い の で , ファ イル の 
終り に 着 し た か どう か を 知る 手段 が 必要 で す . 
その た め の 関 数 が 次 に 説明 する EOF で す . 


の 呈 5 還 4 細 DORI 

EOF は ファ イル の 終り (End of File) に 達 
し た か どう か を 調べ る た め の 関 数 で す . 終り に 
達し て いた な ら ば 真 (- 1), 達し て いな か っ た 
な ら ば 偽 ( 0 ) の 値 を 返し ます . EOF の 返す 値 
が 真 に な っ た と いう こと は , その 次 に ファ イル 
を 読も うと する と Input past end の エラ ー に 
な る と いう こと を 意味 し ます . EOF の 使い 方 の 
簡単 な 例 を 示し て お きま し ょ う . 


1is セ 

10 HFEN "data" FnHR INFLUT AS 半 1 
20 SHIM=0 

2O INFILIT #1)a 

40 SLIM=ELIMTA 

0 IF NT EnF(1) THEN GHTQ SO 
40 ELHEE #1 

79 FRINT EL 

EQ ENI 

ロ E 


この 例 は , “data" と いう 名 前 の ファ イル に 書 
か れ て いる 値 を 読み , その 合計 を 求め る も の で 
す . 50 行 で ファ イル Data が 終わ り に な っ た か 
を チェ ッ ク し , 終り で な けれ ば 30 行 に 戻っ て 次 
の デー タ を 読み 込む わけ で す . EOF 関数 は この 
よう な 型 の 入力 の ルー プ で 用 いま す が , この ル 
ニブ を 使う と き は , ファ イル に 少な く と も 1 つ 


の デー タ が 書か れ て いな けれ ば な ら な いこ と に 
注意 し て 下さ るい. デー タ が 無い か も 知れ な い 時 
に は , BEOF の 条件 判断 を INPUT # の 前 に 置か 
な けれ ば な り ま せん . 

EOF は , この よう に シー ケン シャ ルフ ァイル 
を 読む 場合 に 必ず 登場 する も の で す . ファ イル 
の 終り の 印 は , ファ イル に 対し て 書き 込み を 行 
な っ て CLOSE し た 時 に つけ られ る も の と 考え 
て 下さ い . 


2. 5. 5 LINEINPUT# 
LINEINPUT# は , INPUT# で 文字 列 を 読む 
場合 に 。 カン マ や 引用 符 が 読め な いと いう 不便 
さき を 補 うた め の も の で す . LINEINPUT# で は 
CR/LF で 区 切ら れる か , スト リン グ の 長き の 
制限 で ある 255 文 字 に 達する まで の 全て の 文字 列 
の 読み 込み を 行ない ます . 具体 的 な 使い 方 に つ 


いて は 3 章 で 示し ます . 普通 の LINEINPUT で 


は , カー ソル コン ト ロー ル 等 の コン トロ ー ル コ 
ー ド は 読み 込み ませ ん が , LINEINPUT# で は 
読み 込ま れる こと に 注意 し て 下さ い . 

2. 5. 6 INPUTS$# 

INPUT$ は キー ボー ド か ら 指 定 し た 長き だ け 
の 文字 を 読み 込む も の で し た が , ファ イル 番号 
の 指定 を つけ る と, 指定 し た ファ イル か ら 指 定 
し た 長 さ だ け の 文字 を 読み 込む 働き を し ます . 

INPUT$ (< 長き >,# く < ファ イル 番号 〉》) た と え 
ば INPUTS$ ( 1,#1 ) は 1 番 の ファ イル か ら 1 
文字 だ け 読 み 込 み ま す . この 1 文字 だ け 読 むと 
いう 処理 は テキ スト 処理 を する 時 に は 頻 築 に 用 
いら れる も の で す . 2. 5. 8 で 示す プロ グラ ム で 
実際 に 使わ れ て いま す の で 参照 し て 下さ い . 


2. 5. 7 PRINT#USING 
PRINT USING の ティ スク 版 で す 。 動作 も 
全く 同じ で , USING の 前 に ファ イル 番号 の 指定 
を つけ る だ け で , ファ イル に 対し て 書式 の 指定 
どう り の 出力 を 行ない ます . 実際 の デー タ 処 理 


オフ 


で は , 処理 し た 結果 を 全て ファ イル に 出力 し て 
お いて , 後 で まとめ て プリ ンタ に 出力 する と い 
うこ と が し ば し ば 行なわ れ ま す が , その よう な 
場合 に PRINT#USING が 用 いら れ ま す . 


2.5.、8 シー ケン シャ ルフ ァイル を 用 いた 
プロ グラ ム 例 

ここ で 紹介 する プロ グラ ム は , 入力 ファ イル 
中 の 単語 を 調べ , どの 語 が 何 回 表 わ れ た か を ア 
ルフ ァ ベ ッ ト 順 に 並べ た 表 に し て 出力 する も の 
で , 文字 を 扱う シー ケン シャ ルフ ァイル の 良い 
例 に な っ て いる と 思い ます . 数 値 デ ー タ の シー 
ケン シャ ルフ ァイル に つい て は 3 章 を 見 て 下さ 
さて 出力 を アル ファ ベッ ト 順 に する た め に 
は , 全て の 語 を 配列 の 中 に 入れ て お き , 最後 に 
それ を 整列 (ソー ティ ング ) する の が 1 つの 方 
法 で す が , ここ て 示す 方 法 は 2 分 検索 と いう 方 
法 で , 木 が 常に アル ファ ベッ ト 順 に 並ん だ 語 
表わす よう に 入力 し た 語 を 木 に 加え て いく 方 法 
で す . まず 2 分 木 と いう 構造 に つい て 説明 し ま 
25 

2 分 木 と は 1 つの 項目 に 他 の 2 つの 項目 を さ 
す ポ イン タ を 設け た も の の 集まり の こと で す . 
その 基本 要素 は 節点 と 呼ば れ , 特に 木 構造 の 始 
点 と な る 節点 を 根 と 呼び ます . また 各 節 点 か ら 
みて 左 の 部 分 を 左 2 分 木 , 右 の 部 分 を 右 2 分 木 
と 呼び ます . 

この 2 分 木 を 使っ て 順序 を 表現 する こと は 
左 2 分 木 に その 節点 より 順 庄 の 小さ な も の を ぶ 
ら さ げ て 、 右 2 分 木 に は 順 計 の 大 きい も の を ぶ 
ら さ げ る こと に より 達成 され ます .( も ちろ ん こ 
の 反対 で も 良い の で す が ). た と えば F を 根 と 
する よう な 木 で A, F, R の 3 つの 語 の 順序 関係 
を 示せ ば 下図 の よう に な り ま す . 


い . 


ーー 


各 節 点 は , 左 2 分 木 を さす ポイ ンタ と 右 2 分 
木 を さす ポイ ンタ を 持つ の で これ を LEFT. 
RIGHT と 呼ぶ こと と し まし ょ う . F の LEET 
は A を さき し, RIGHT は R を さして いま す . 


A と R の ポイ ンタ は 何 も さ す も の が な い の で , 
これ を 斜線 で 表わし て お きま す . 

さて , この 構造 を 使っ て ある 語 を 探し た り , 
追加 し た りす る こと は 次 の 手順 に 従え ば 行なえ 
ます . 

@ まず 根 に 着目 する . 希望 する 語 が この 節点 
の 語 よ り も 大 きけ れ ば , 木 を 右 へ 進む . も 
し 小さ けれ ば 左 へ 進む . 希望 する 語 が 見 つ 
か れ ば 。 めで た し めで た し , 

@ 不幸 に し て , 見 つか ら な いま ま 終 点 に 達し 
て し まっ た な ら ば (ポイ ンタ が 何 も さ し て 
いな い 場 合 ), その 語 を 順序 の 大 小 に 応じ て 
その 人 節点 の 右 か 左 に 付け 加え る . 


た と えば 先ほど の 本 に C, G, P を この 順番 で 


追加 すれ ば 下図 の よう に な り ま す . 


この よう に し て 木 が 完成 し た な ら ば , 結果 を 
出力 する た め に , 木 を た どら ね ば な り ませ ん . 
左 2 分 木 の 方 が 順序 が 小さ い の で し た か ら , 基 
本 的 を 考え 方 は 次 の よう に な り ま す . 

1. 着目 し て いる 節点 の 左 2 分 木 を 全て た ど 

る . 

2. 着目 し て いる 節点 の 語 を 出力 する . 

3. 着目 し て いる 節点 の 右 2 分 木 を 全て た ど 

る . 
この 手続 き を 根 か ら 始 め て 再帰 的 に 行なう と 

全て の 節点 を た どる こと に な り ま す . さき ほど 
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の 木 を た どっ て みる と …. 

@ ま すず 根 で ある F に 対し て 上 記 の 1 の 仕事 を 
始め る . F の LEFT を た どり A に つく . 

@A に 対し て 1 の 仕事 を 行なう . LEFT は 何 
も さして いな い の で 1 の 仕事 は 終了 . 2 の 
仕事 を 行ない A を 出力 . 続い て 3 の 仕事 を 
の 2 の 5 舞 KI ど HIUT を だ どり C に つく . 

@C の LEET は 何 も き し て いな い の で 1 の 
仕事 は 終了 . 2 の 仕事 で C を 出力 . RIGHT 
も 何 も さ し て いな い の で 3 の 仕事 も 終了 . 
A に 戻る . 

@C の 処理 が 終了 し た と いう こと は , A の 3 
の 仕事 も 終了 し た と いう こと な の で F に 戻 
る . 

@ 人 AA か ら 戻 っ て きた と いう こと は , F の 1 の 
仕事 が 終了 し た と いう こと で ある か ら , 2 
の 仕事 を 行なっ て F を 出力 する . 続い て 3 
の 仕事 を 始め る . RIGHT を た どり R に 着 
《。 

@R の LEFT を た どり G に 着く 。 民 を 出力 
し , RIGHT を た どり P に 着く 。 

@P の LEFT RIGHT は 何 も さ し て いな い 
の で を 出力 し て G に 戻る . 

@G の 処理 が 終わ っ た の で R に 戻る . 

@R を 出力 . RIGHT は 何 も ちさ し て いな い ぃ の 
で F に 戻る 。 

@F の 右 2 分 木 を 全て た どっ た の で F に 対す 
る 処理 は 終了 . F は 根 で あっ た か ら , 木 を 
全て た どっ た 

本 書 は , デー タ 構 造 や アル ゴリ ズム に 関す る 

説明 を 目的 と し て いる わけ で は な い の て で 2 分 木 
に 関す る 説明 は この 程度 に し て お きま す . 木 構 
造 に つい て は Kmnuth の \Fundamental Algorit- 
hms? (サイ エン ス 社 「 基 本 算法 」) に 詳し く 書 か 
れ て いま す の で 参照 し て くだ さい . また アス キ 
ー シ ス テム バン ク PET# 3 に は 木 構造 を 扱っ た 
BASIC プロ グラ ム が 載っ て いる の で 参考 に な る 
と 思い ます . 
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Liemo Frogram for ectiori ご 
双 IE101919) 

呈 17E=EOO 

LIM TAELE$(ETZE) ヵ LEFTX(SIZE ) 
HIM RIGHTX(EIZE)jEHLINTX(EIZE ) 
IIM ETACEX( 呈 0 ) 


Main Routire 


INFUT "file ramei "jiNI ま 

PEN NM$ FIR INFILUT AE #1 
AL*="ABELIEFGH1TJELMNHFGRETLHMMXYZ" 
AN$="0 4 ロ ん 7 ロウ リオ 人 し 中 

NF=1:R1= 


9) 


FINh=Q 

BSLIE SEO 

IF FINTL THEN GuSLHE 10 
IF NOT EnF(1) THEN GUTO 20 
GSIB 610 


ELISE 音 1 
ENIL 


Subroutine: ETMRLI 


CH$=INFLT ま (1 )#1 ) 
IF CH$="! "THEN BTG 400 


=" LUI 
IF INSETR(AL ま )EH ま )=O THEN GTH 490 
MI も =M 口 + じ H ま 
CH=TNFILIT ま ( 1) 半 1 ) 
IF INETR(AN も CH) THEN GTH 4S50 
FINL=-1 
RETURN 
Suhroutire:i SEARCH 
R=R1 
1TF R=O THEN TAELE* ま (NF ) =MC$iLEFTX(NF ) =0* 
RIGHTZ(NF ) =0 CHILINTX(NF ) =1 :NF=NF+1 : 
EHTI SEO 
IF TAELE$(R) >MI$ THEN R1=LEFTX(R) * 
IF R1=O THEN LEFTX(R)=NF :GHTH SSO 
ELSE GHTH 5SC 
IF TABLE ま (R) ぶ M ロ $ THEN R1=RIGHTZ(R) 


IF R1=O THEN RIGHTX(R)=NF iGHTH 5SO 


ELSEE nhIT ロ 5EQO 
ELNTX(R ) =CHILINTX(R )+1 
R1=1 
RETURN 


Suhroutinek FRINT 


SP=0!R=1 

STACKZ(SF ) =R1 :SF=SF+1 

1F R=Q THEN GTH 700 
R1=R:R=LEFTX(R):GHSLIE 640 
FRINT TABLE*$(R) iTAB(1S) 3 
FRINT LISTING" 半 "53EHILINTZ(R) 
R1=R:R=RIGHTX(R) :GSLE 640 

SF=SP-1 :R=STACRX(SF ) 

RETURN 


人 


"ReSEFVE ら て Fi ヨコ こ Pa に B 
7 ロ P て 0 SOCO MO0F ロ S 


Input file name 


* 全 L ま is alphabet 
7AN も is alpharnumeri に こ 


Clear find flag 
7iet word 


7Repeat unti1l eof 


PFin も 


7 ご kiP blarn ド 


1Tf CH も is not in AL*$ then ret。 


*RePeat unti]l に ビ H ま is not in AN ま 


7Set find fl]lag 


New word 、.. aPPeTd 


Search left Part 


Search right Part 
*Find 。.. increment に ount 


*Fush R1 


FrFint ]eft Part 


*Frint right Part 
*Fop R1 : R=R1 


まず プロ グラ ムリ スト に つい て 少し 説明 し て 
お きま し ょ う 。 リ スト は プリ ンタ で と うた も の 
な の で 画面 に で る も の と は 和 宇 体 が 異な り ま す の 
で 注意 し て 下さ い . 特に , O と 0 は 慣れ な いと 
間違え 易い か も し れ ま せん . また リス ト は , プ 
ログ ラム の 意味 と 構造 が わか りや すい こと を 重 
点 と し て いる の で 注 彼 が か な り 入 っ て いま すし , 
行 の 頭 に 空白 を 入れ 段 づ け も 行なっ て いま す . 


( "は RPM 文 の 省略 型 で す ) あな た が プロ グ 


ラム を 入れ る と き に その ま に 3 人 APG72 に 3 

5 結構 で す が , REM 文 や 余分 な 空白 は 実行 に は 

関係 の な いも の で すか ら 取 り 去 っ て も か まい ま 

せん . 変数 名 も 。 プロ グラ ム の 意味 が わか り 易 

いよ うに 長い も の を 使っ て いま す が , BASIC は 

最初 の 2 字 し か 判別 し ませ ん か ら 短 くす る こと 

の < きま (3 

プ ブログ ラム の 先頭 で は 必要 な 宣言 を 行なっ て 

いま す . 文字 型 の 配列 を 使う の で CLEAR 文 で 

文字 領 域 を と っ て お きま す . ここ で は , 単語 は 

300 種 まで と いう こと に 限定 し て 考え る こと に 

し まし た の で 3000 あ れ ば 充分 で し ょ } う . 配列 , 
TABLE は , 単語 を 入れ て お くだ た め の 配 列 で す . 
LEFT%, RIGHT% は 左右 の ポイ ンタ の た め の 
配列 で す . 整数 型 に し て お く の は メモ リ 使 用 量 
が 少な いか ら で す . この 2 つの 配列 は , 次 の 節 
点 を 示す 添字 の 値 を 入れ る こと に より ポイ ンタ 
と し て 用 いま す .COUNT% は 単語 の 出現 回 数 を 
入れ て お く た め の も の で す . 

230 行 か ら 360 行 は メイ グル レーー ワ ロジ GT 3 
230 行 で ファ イル 名 を 入力 し , 240 行 で その ファ 
ん 2 ショ ニン / ジ 2 し ES 月 SC の 5 9 に ファ イル 名 
の 指定 に は 文字 変数 が よく 用 いら れ ま す . 

290 行 か ら 320 行 で 構成 され る ルー プ で は 。 単 
語 を ひろ っ て き て は 2 分 木 に 入れ る 作業 を 繰り 
返し ます . EOF まで 達する と この ルー プ か ら 抜 
け 出 し 結果 を プリ ント し て 終わ り で す . 


サ プ ル ー チ ン GETWORD は 入 カ ファ イル か 


ら 単 語 を 1 つ ひ ろ っ て 〈 る 手続 き で す . ここ で 
単語 と は 英字 で 始ま り , 英字 また は 数 字 が 続く 
文字 列 で ある と 決め て 処理 し て いま す . 数 字 を 
含む よう な 単語 が ある の か と 思い に な る か も し 
れ ま せん が , BASIC の 変数 名 が そう で す . 実行 
例 で も 示し ます が , 入力 ファ イル と し て プロ グ 
フラ ム フ ァ イル を 扱う こと を 前 提 と し た の で この 
よう な 規則 に な っ て いま す . 

まず 400 行 と 410 行 と で 空白 の 読み と ば し を 行 
な いま す . ファ イル 中 か ら 1 文字 読み 出す の に 
は INPUT$ が 使わ れ て いま す . 

空白 で な い 文 字 が 見 つか っ た な ら ば , 単語 で 
ある 可能 性 が ある の で WO0$ を ヌル に し て お き 
ます . ひろ っ た 単語 は WO$ に 入れ られ る か ら 
で す . 440 行 で は 文字 が A か ら Z の 英字 で ある 
か チェ ッ ク を 行ない ます . 特殊 記号 は 単語 の 先 
頭 文 字 と な る 資格 が な い の で , ここ で は ね られ 
て メイ ン ル ー チ ン に 戻り ます . この 時 FIND の 
値 が 0 ( 偽 ) で 変わ ら な い 事 に 注意 し て くだ さき 
い . FIND の 値 が 0 の 時 に は 木 へ の 追加 は 行 な 
われ ませ ん (310 行 ) . 

めで た く 単 語 の 先頭 文字 と 認め られ た な ら ば 
続い て 後続 文字 が ひろ われ て WO$S に まとめ ら 
れ ま す (450 行 一 470 行 )、 英 字 で も 数 字 で も な い 
の が で て きた ら 語 の 区 切り と みな され る わけ で 
す . こう し て 無事 に 単語 を ひろ うこ と が で きた 
場合 に は FIND が - 1 ( 真 ) に セッ ト さ れ ま す . 


サブルーチン SEARCH は 単語 WO$ が 2 分 
木 の 中 に ある か を 調べ る 手続 き で す . 見 つか っ 
た 場合 に は その 出現 回 数 を 1 つ 増 や し , 見 つか 
ら な けれ ば その 語 を 木 に 追加 し ます . この 手続 
き 中 で は R は ポイ ンタ の 値 を 示し ます . ポイ ン 
クタ の 値 は さ し 示 す も の が あれ ば その 配列 の 添字 
の 値 , 何 も さ す も の が な いり 場合 は 0 と し ます . 

540 行 は ポイ ンタ が 何 も さ し て いな い めい 場合 , つ 
まり , 木 に 追加 する 場合 の 処理 で す . 変数 NF 
に は まだ 使っ て いな ぃ 添字 の 値 (Next Free) 
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を 保持 し て いま すか ら , TABLE$ (NF) に 単語 
の 登録 を し ます . 新しい 節点 は まだ どこ も さ し 
ませ ん か ら 対 応 する LEFT, RIGHT は 0 に し 
て お き , 出現 回 数 を 1 回 に し ます . NF を 1 つ 
増やせ ば 処理 は 終了 で す . 

550 行 は , WO$ の 順序 が 着目 し て いる 節点 の 
単語 より も 小さ い 場 合 の 処理 で す . 配列 LEFT 
6 の 値 を ひき 出し R に 代入 する こと に より 木 を 
左 へ た どる こと を 実現 し て いま す . も し , LEFT 
が 何 も さ し て いな い 場 合 に は 新しい 節点 を 左 に 
ぶら さげ る 必要 が あり ます か ら LEFT% (R) 
に NF を 代入 し て お きま す . GOTO で 350 行 に 
戻る こと に より 探索 は 続行 され ます 

560 行 で は 同様 に WO$ の 順序 が 大 きか っ た 場 
合 の 処理 が 行なわ れ ま す . 

570 行 は 単語 WO0$8 が 見 つか っ た 場合 の 処理 に 
あたり ます . 580 行 で R1 を 1 に し て いる の は , 
この サブ ルーチン が 2 回 以上 呼ば れ た 時 に 正 し 
〈 根 か ら 探索 を 始め る た め の 操 作 で す . 

サブ プルー チン PRINT は 2 分 木 を た どっ て 各 
節点 の 単語 と その 出現 回 数 を 出力 する 手続 き で 
す . 手続 き が 再帰 的 に 定義 され て いた の で プロ 
グラ ム で も 再帰 呼び 出し を 用 いて いま す . 660 行 
で 左 2 分 木 を た どり 690 行 で 右 2 分 木 を た どり ま 
す . 手続 きか ら 戻 る と き に は 木 を どの よう に た 
どっ て きた か に 応じ て どの 節点 に 戻れ ば 良い か 
を 覚え て お く 必 要 が ある の で ポイ ンタ KR の 値 を 
スタ ッ ク に プッ シュ , ポッ プ し て いる こと に 注 
意 し て 下さ い . 

以下 に 実行 例 を 示し ます が , この 結果 は 入力 
7 の ゆ レ 00( 玩 の ブロ グフ の ブロ グラ バフ 
ァイル を 指定 し た も の で す . プロ グラ ム が アス 
ペー セー タン さ MG れ ば で の よう に で ブロ グ 
ラム 中 の キー ワー ド や 変数 名 の 出現 回 数 を 調べ 
る こと が で きる の で す .。 この プロ グラ ム は 小 文 
字 は 区 切り 記号 と みな すこ と に な っ て いる の で 
・ 注釈 中 の 文字 は 大 文字 し か ひろ われ て いま せん . 
も し, 完全 に プロ グラ ム の キー ワー ド と 変数 名 
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だ け を 負 理 し た けれ ば 注 秋 を LINEINPUT# を 
使っ て 読み と ば す 必 要 が ある で し ょ う . また $, 
26,# を 変数 名 の 最後 の 文字 と し て 認め た 方 が 良 
MG 2 


ABChEFGH1JRKLMN ロ FRRETHVMXYZ 1 
間 上 


合 
AN 4 
A ミ 1 
に 1 
ビ H 選 
CLEAR 2! 
CLHSE 1 
CUNT oy 
HI 1 
LiIM 3 
ELSE 記 
ENI 1 
EQF 1 
F 1 
FINI 3 
FR 1 
gi 1 
GETMQRD 1 
QSLIB 5 
GnTn 1Q 
1 が 
IF 11 
INFLUT 4 
INSTR と コ 
LEFT 5 
NM 1 
N 1 
NF ウッ 
NM 2 
NT 1 
FEN 人 
0 ム 
PRINT 円 
い 36 
R1 13 
RETLURN 3 
RIGHT 1 
に 1 
SEARCH 1 
SIZE ご ) 
口上 7 
STACK で ] 
TAB 1 
TABLE 紀 
THEN 11 
USING 1 
Mn に ) 


プロ グラ ム に 少し 変更 を 加え て 小文字 や 特別 
な 記号 を 受付 ける よう に する と 一 般 の 文書 も 処 
理 で きる よう に な り ま す . 次 に 示す の は ある 本 
の 序文 (PREFACE) を 処理 し た 結果 で す . M 
の と ころ に で て くる 人 物 (? ) の 名 前 か ら 本 の 
内 容 が 推 宗 で きる と 思い ます が …. 


人 

ABQUT 
ACHIEVEL 
ACROSS 
AVENTURES 


AN0THER 
ANYTHING 
ART 
AS 
AT 
ATTAIN 
AUGUST 
BE 
BEAR 
BECOME 
BEEN 
BEFORE 
BEING 
BELTEVE 
BOOK 
BORING 
BRING 
BUT 
BY 
CHILn 
CnNE 
CONTRIEUTEn 
haAnDIES・ 
DaADDy 
DARK 
DEAR 
DELIGHT 
DESCRIBE 
DIGNIFIEh 
RAM 
EIERFIITIER 
ESPECIALY 
EVEN 
EVERY 
EVERYNE 
EXCEPTIQNAL 
EXCLAIM 
EXPRESS 
FAMILY 
FATHER 
FEEL 
FIREFLIE5 
FLOURTSHES 
FOOLTSH 
FORHING 
FORTY 
FROM 
GARDEN 
GAZING 
GETTING 
GOn 
HAPPY 
HAS 


HATTIFATTENERS 


HAVE 

HE 
HEARTFELT 
HESITATIIN 
HIS 


+ー 


コル ルコ オニ オニ オニ ミニ オニ ゴー ささ マエ ピー さす NTT NTー ーー nl 


ビーロ OO つの の 忌 SGSROCoCoCoCOE ESECC つ EE つつ つつ つつ mo 


HLIGK IN 
HCLIEE 

1 

IF 

IN 

INLEELH 
INSTRLCTIIN 
INTO 


MANY 
MATCHLESS 
MAY 
MEM ロ TIR-FEN 
MEIMQIRS 
MENMI ロ RY 
MINH 
MMIN 
MMINMANMA 
MDIMINFAFA 
MIiIMTINS 
MMINTRH ロ LL 7S 
MMINVALLEY 
MIST 

MLIST 

MY 

MYSELF 
MYSTERI ロ ILIS 
NICE 

NT 

NITES 

niF 

HN 

HNCE 

HNE 

HR 

IVER 

HMNER 
FAGES 

FAM 

FE ロ PLE 
FERISHAELE 
FERSIN 
FERSHN-AGE 
FERSLUATIN 
FIISE 
FREFACE 
FRINT 

品 ITTE 
RATHER 
REAh 
REALERS 
REALLY 
REIMAREABLE 
5EALINESS 
ERTITLIE 
SHIRT 
HI ロ ILILH 
51IGN 
SIMFLE 
SITTING 


ょ ユ 


ュー 
ニコニ ミニ コー ニョ ニョ オニ 3 ニョ コー ニコ ニーヨ ニニ ゴニョゴニョ ニー ゴー ョ ーー ゴー さき 上 ーー Oi 国王 ーー コー ーー ロビ ビビ ビビ ビビ ビビ ビビ ラテ ビ herTND Im に Cm (nm テート ュ 』 ト ) 


ょ ー 


お ーー 


SN ロ LT 1 MRITE 
SE 1 YES 
SIN 1 YIELIH 
STARTING 1 Ynll 
STILL 1 YHHNG 
STQRMY 1 YHLR 
STQRY 1 YaLITH 
STRENGTH 
SLIITABLE 
TALKRING 
TEMPTATIIN 
THANKS 

THAT 

THE 

THEIR 

THINK 

THINKS 

THIS 
THHUGHTFULLY 
THREE 

TH 

THNIGHT 

TQQ 

TRENMELE 
TRIITH 
TRLTH-LHVINi 
VELVET 

VERY 

MALK 

MANT 

MHAT 
MHATEVER 
MHEN 

MHERE 

MHILE 

HI 

MIFE 

MILL 

MINIIHM 
MISELCIM 

MITH 

MIRLS 

MIRE 

MHRLL 


mm 
テー テー ビビ いい 


ュ ニニ ニニ ビュ ロロ 上 ロビー ビ ロ ビ ロビ ビビ ビーロ ビー ビニ 0 ビビ モーNNDD ビ ビー ビビ ビー 
6 Ki ごい mmー トコ てい 


この よう な 結果 を 得る に は 小文字 を 大 文字 に 
変換 し て 処理 し , アポ スト ロフ ィ や ハイ フン を 
語 の 一 部 と し て 受け 付け る こと で す . プロ グ 
ラム を どの よう に 変更 すれ ば よい か は 皆さん の 
問題 に し て お きま し ょ う . この 序文 は 約 1 ペー 
ジ で し た が 出 て くる 単語 の 種類 は 約 190 種 で す 
どん な 本 で も 1 ペー ジ に 出 て 〈 る 単語 の 種類 は 
150 一 250 程 度 の よう で す . 配 列 の 大 き さ が 300 ぁ 
れ ば , 大 抵 の 本 の 1, 2 ペー ジ は 処理 で きる と 
思わ れ ま す . 32K の メモ リ な ら ば か な り 余 挫 が 
ある の で SIZE と 文字 領域 を 大 きく する こと に 
より , さら に 多く の ペー ジ 数 を 処理 で きる と 思 
いま す . 試し て みる と お も し ろ い で す よ . 


=) 三 


2.6 ラン ダム ファ イル に 対し て 働 
くも の 

ここ で は ラン ダム ファ イル の 操作 に 用 いる ス 
テー トメ ント そ 関 数 に つい て 説明 を し ます . ラ 
ンダ ム フ ァ イル が どん な も の で あっ た か を 思い 
出し て お いて ください. 


の 十 6 還 OPEN 

シー ケン シャ ルフ ァイル の 時 は ファ イル の オ 
ー プ ン の 際 に モー ド の 指定 が あり まし た が , ラ 
ンダ ム フ ァ イル の 場合 に は モー ド の 指定 が あり 
ませ ん . シー ケン シャ ルフ ァイル で は ファ イル 
の 先頭 か ら の 読み 書き , ある い は ファ イル の 終 
わり へ の 書き 足し し か で き な か っ た の に 対し , 
ラン ダム ファ イル は どこ か ら も 読み 書き が で き 
る の で 以後 の ファ イル 操作 に 条件 を 加え る よう 
な モー ド の 指定 は 無用 な も の で す . 


OPEN < ファ イル 名 >AS #K フ ァイル 番号 > 


指定 し た ファ イル 名 が 存在 し な い 場 合 に は 新 
し くそ の ファ イル が 作ら れ ま す . 
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PUT は ラン ダム ファ イル へ の 書き 込み を 行 な 
うた め の ス テー トメ ント で す . シー ケン シャ ル 
ファ イル は 着物 に た と える こと が で きま し た が , 
ラン ダム ファ イル は 普通 の 本 に 相当 する も の で 
す . で すか ら , 好き な ペー ジ を 開い て 書き 込み 
を 行なう こと が で きま す . 文章 を 書く 場合 で も , 
「 う まい 序文 が 思い 浮か ば な いか ら 3 章 の 本 文 
か ら 書 こう .」 な ど と いう こと を し ます が , ラン 
ダム ファ イル で も その よう な 事 を する こと が で 
きま す . PUT 文 は ちょ うど 1 ペー ジ 分 の 文章 を 
ファ イル の 中 の 指定 し た 位置 に と じ 込 む 働 き を 
する も の で す . ルー ズリ ー フ の ノー ト や 書類 を 
と じ 込 むための B 5 版 の 紙 の ファ イル を 想像 し て 
いた だ けれ ば 良い で し ょ う . OPEN で 新しい フ 


ァイル 名 を 指定 する と BASIC は 中 身 の な い 新 
品 の ファ イル を 準備 し て 表紙 に 名 前 を 書い て く 
れる わけ で す . ファ イル を 使う 側 と し て は , 1 
ペー ジ 分 の 文章 が で き あ が る 度 に ,「 ハ イ / 
れ 3 ペー ジ 目 の 文章 ね / 」 と 言っ て , BASIC に 
ファ イル に と じ 込 む 作 業 を 頼む わけ で す . PUT 
文 を 使っ て この 依頼 を 表 わ せ ば 湊 の よう に な り 
ます . 


ー 
ュー 


UE 類 よ 。 3 
「 1 番 の と ころ に ある 原稿 を ファ イル の 3 べべ 
ー ジ 上 且 に と じ 込 ん で 《 だ さい 。』 


この よう に PUT 文 は 1 枚 の 原稿 用 紙 を と じ 
込む 作業 能力 し か 無い 事 に 注意 し て 下さ い . シ 
ー ケ ン シ ャ ルフ ァイル の PRINT# で は 1 文字 だ 
け で も ファ イル に 対し て 書き 込む こと が で きま 
し た が , PUT 文 で は 常に 1 ペー ジ 単 位 の と じ 込 
み (書き 込み ) し か 行 な を な い の で す . で すか 
ら , PUT 文 を 使う 前 に 必要 な 原稿 用 紙 へ の 書き 
込み 作業 を 行なう) た め の LSET 文 が 別に 用 意 さ 
れ て いま す . 


な お PUT 文 で と じ 込 む 原 稿 用 紙 は 256 字 づめ 


と いう こと に な っ て いま す . 原稿 用 紙 の 使い 方 


は 次 の FIELD 文 の 説明 を 読ん を で くだ さい . 


ペー ジ の 指定 に つい て 注意 し て お きま す . PUT 


文 で ペー ジ 指 定 を する 際 に は , で きた ペー ジ の 
分 か ら 指定 を し て も 良い こと は 述べ まし た が , 
BASIC は それ だ け の ペー ジ 数 を と じ こ め る よう 
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KS ミラ ーーー ニュ ウノ 


に ファ イル 全体 の 大 き さ を 決定 し ます か ら 要 注 
意 で す 。 た と えば , PUT 所 , 300 と する と, フ 
ァイル の 300 ペ ー ジ 目 と し て と じじ 込 み を 行なう の 
で す が , BASIC は 1 -299 ペ ー ジ の 原稿 が 入る 
よう に ディ スク 上 に その 領域 を し っ か り 確 保 し 
ます . で すか ら , ファ イル を すでに た くさ ん 作 
っ て ある ディ スケ ッ ト を 使う 場合 に は ,「300 ペ 
ー ジ 目 と じ て 下 さい . 」 と 頼ん で も 「1 一 299 ペ 
ー ジ を 入れ る 場所 が な い の で ダメ です. 」 と 断 わ 
られ ます . この よう な 時 の エラ ー メ ッ セ ー ジ は 
Disk Full で す . また 1 ペー ジ 目 か ら 順 番 に 書 
いて は PUT し て いけ ば よい の で すか ら , 後ろ 
を 書い て は 前 を 書い て な ど と いう よう に 飛び 飛 
びに PUT し て , 結局 何 も 書 か な い ペ ー ジ が あ 
っ た と し て も , ファ イル 中 に は その ペー ジ の 領 
域 が と られ て し まう の で ディ スケ ッ ト の 記憶 領 
域 の 無駄 使い に な り ま す . また , この よう に PUT 
を 行なわ な か っ た ペー ジ に は どん な 内 容 が 入っ 
て いる か 保証 され な いこ と に な る の で ファ イル 
を 読む と き に 注意 し な けれ ば な り ま せん . ラン 
ダム ファ イル を 作る 場合 で も 1 ペー ジ 目 か ら 順 
番 に PUT し て いく の が 最も 確実 で す ,、 BASIC 
の 方 も この 事 を 心がけ て いる の で , ペー ジ の 指 
定 を 省略 し て 単に PUT # と する と 最も 最近 
PUT (また は GET) を し た ペー ジ の 決 の ペー 
ジ だ と 解釈 し ます . 


引当 回 059Dp) 
PUT 文 は 1 枚 の 原稿 用 紙 を ファ イル に 級 込 
よう を な 働き だ と 説明 し まし た が , FIELD 文 は 
原稿 用 紙 の 使い 方 を 決め る よう な 働き で 文章 の 
レイ アウ ト を 決め る と いう の が 適切 な た と え で 
し ょ う . 原 稿 用 紙 は 256 字 詰 と いう 規則 が ある だ 
け で 縦横 の 大 き さ は 決ま っ て ませ ん か ら 1 次 
元 の 配列 と 考え る こと が で きま す . FIELD 文 は 
この 配列 を どの よう に 分 割 し て 使用 する か を 決 
定 し ます . 
た と る ば 俳句 の よう な 詩 責 は 五 七 五 と いう よ 


う に 型 が 決ま っ て いる の て 割り 当て が 容易 に 行 
な えま す . ラン ダム ファ イル を 使う 場合 に は い 
つも FIELD 文 で 割り 当て を 行ない ます か ら こ 
の よう に ある 型 を 持っ た 文章 で ある こと が 望ま 
し いこ と に な り ま す . 逆 に , 型 が 頻繁 に 変る よ 
う な 場合 に は その 度 に FIELD 文 を 使わ ね ば な 
ら な い 事 に な り ま す . 実際 の デー タ 処 理 で は 申 
し 込み 書 み と か 名 簿 と いう よう に 記載 事項 が 定 
まっ て いる 文書 が 多い の で ,「 名 前 は 15 文 字 分 の 
スペ ー ス が あれ ば 良い だ ろう .」 と いう よう に し 
て 分 割 を 行なう こと が で きま す . 

具体 的 な FIELD 文 は 次 の よう に な り ま 9 


FIELD 打 、 5 ASA$, 7 ASB$, 5 AS 
C$ 


この 例 で は 256 文 字 の うち の 最初 の 5 文字 を AS 
に , 次 の 7 文字 を B$, 次 の 5 文字 を C$ の 領 
al 割当 記 ます ラン ダム フ ァイル に 対 
する 読み 書き は この よう に し て FIELD 文 て 害 
り 当て た 文 宇 変数 を 介し て 行ない ます . 原稿 に 
書く の は 文字 で すか ら 割 当て の で きる の は 文字 
変数 だ け で ある こと に 注意 し て くだ さき い 。 例 で 
は 256 文 字 の う ち , 割り 当て を 行なっ た の は 17 文 
字 だ け で し た か ら 残 り の 239 文 字 は 末 使 用 と ぃ う 
こと に な を なり ます . 記憶 領域 を 有効 に 使う た め に 
は , 割り 当て を 上 手 に 行なっ て 無駄 の な いよ う 
に する こと も 必要 で す .256 文 字 を 細か く 割 る 必 
要 が な い 時 で も 最低 2 つ に 分 割 す る こと が 必要 
と な る こと に 注意 し て くだ さい . 


FIELD #i, 256AS A$ 


と で きれ ば 1 ペー ジ 分 の 文字 を 全て A$ を 介し 
て 読み 書き で きる こと に な る の で す が , 残念 な 
が ら , 文字 変数 の 長き は 255 文 字 と いう 制約 が あ 
り ます . で すか ら , 256 文 字 を 落ち こぼれ な く 読 
書き する に は 最低 で も 2 つ に 分 け な け れ ば な 
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ら な い の で す . 

1 ペー ジ は 256 文 字 分 の 文字 し か 入り ませ ん か 
ら , それ 以上 の 文字 を つめ 込 も うと する と Field 
over flow の エラ ー に な り ま す . た と えば 次 の 
よう な 場合 で す . 


FILD 抽 , 100 AS A$,200 AS B$ 


FIELD 文 の 実際 の 使わ れ 方 に つい て は 3 章 を 
参照 し て くだ さい . 


2 た 55 nbESET RSET 
PUT を する 前 の 原稿 用 紙 に 対す る 書き 込み を 
行なう の が LSET, RSET で す . 原稿 用 紙 256 
文字 の うち の 何 文字 目 か ら 書 く か は , FIELD 文 
で の 指定 で きま り ま す . つま り , LSET, RSET 
は FIELD 文 で 割り 当て た 領域 へ の 代入 文 に 相 
0 る 0 応 


FIELD 抽 , 20 AS A$,20 AS B$ 
LSET  A$= "PC-8001/ 
RSET B$= “N 一 BASIC? 


この 例 で は 256 文 字 の う ちの 最初 の 20 文 字 の 部 
分 に “PC 一 8001′ と 書き , 次 の 20 文 字 に は “N 
ーBASIC? と 書い た こと に な り ま す , と ころ で 
この 2 語 は どちら も 20 文 字 に 満ち あま を せん. この 
よう な 場合 に は 余っ た と ころ に は 空白 文字 が 入 
り ま す . LSET の 場合 に は 文字 を 左 詰め で 入れ 
る の で , PC-8001 と いう 文字 の 後に 空白 が 13 個 入 
る こと に な り ま す . RSET の 場合 に は 文字 は 右 
詰め で 入り ます . 従 が っ て 13 個 の 空白 に 続い て 
N-BASIC と 書か て る こと に な り ま す . 逆 に 書 
〈 文字 の 方 が 割り 当て た 領域 より も 長い 場合 に 


は 余分 な 文字 は 無視 され て し まい ます . 次 の 例 
を みて いた だ けれ ば 良く わか る で し ょ う . 


SO LSET A$=" 
3O RSET E$=" ム 5 


40 PRINT A$ 
5O_ FRINT BE$ 
40 ENI 


RSET の 動き に は 注意 し て くだ さい . 右 詰 
と いっ て る 領域 が 足 り な い 時 に は 左 の 方 か ら 文 
字 を 入れ ます . 

LSET, RSET で 代入 を 行なう 文字 変数 は , 
FIELD 文 で 領域 を 指定 し た 文字 変数 で な けれ ば 
な り ま せん . そう で な いと , 正しく 原稿 用 紙 の 
上 に 書い た 事 に な り ま せん . 


2 69 IGE 

ラン ダム ファ イル は 書き 込み に PUT を 用 い 
ます が , 読み 込み に は GET を 用 いま す . PUT 
が ファ イル に 対し て 1 ペー ジ 緑 じ 込 む 仕 事 を す 
る の に 対し , GET は ファ イル 中 か ら 1 ペー ジ 取 
り 出 し て き て くれ る わけ で す .GET は ペー ジ を 
取り 出し て くる 仕事 し か し て くれ ませ ん か ら , 
BASIC で は その 内 容 を 直接 参照 する こと は で き 
ませ ん . 文字 を と り 扱 うに は 文字 変数 に 入っ て 
いな けれ ば な ら な いか ら で す . し た が っ て , 読 
ん だ 内 容 を 文字 変数 に 一 度 和 人 れ な けれ ば な り ま 
せん が , この 仕事 は FIELD 文 が 行なっ て くれ 
ます . GET で 読ん だ 後 で FIELD 文 を 使え ば , 
読み 込ん だ 256 文 字 を 各 文 字 変 数 に 振り 分 け て く 
れ ま す . また , GET を 使う 前 に FIELD 文 を 
使っ て あれ ば , その 指定 に 従 が っ て GET し た 
と き に 振り 分 け て くれ ます . 

GET 文 の 使い 方 は 次 の よう に な り ま す . 


GEU 軍 表 計 3 
「 1 番 の ファ イル の 3 ペー ジ 目 を と っ て くだ 
さい .」 
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この と き に FIELD 文 で 決 の よう な 指示 が 出 
され て いる と , 3 ペー ジ 目 の 先頭 の 20 文 字 が AS$ 
に , 次 の 20 文 字 が BS に は いる こと に な り ま す . 


FIELD 打 20 AS A$ 20 AS B$ 


GET する 時 に も , ペー ジ の 指定 に 際 し て 注意 
が 必要 で す . 第 1 に , PUT で 書き 込み を 行なっ 
て いな い ペ ー ジ に は 何 が 書か れ て いる か わか り 
ませ ん . で すか ら , PUT を し て いな い ペ ー ジ を 
GET し な いよ うに し な く 〈 く て は な り ま せん . 指定 
し た ペー ジ が ファ イル の 大 き さ を 越え る 場合 に 
は Imput past end の エラ ー に な り ま す . 300 ペ 
ー ジ か ら な る 本 の 301 ペ ー ジ 目 を くれ と いっ て も 
無理 な 注文 だ か ら で す . シー ケン シャ ルフ ァ イ 
ル で は , ファ イル の 終り を 知る た め に , EOF 関 
数 を 用 いま し た が , ラン ダム ファ イル で は , フ 
ァイル が 何 ペ ー ジ か ら 成 る か を 知る た め に LOF 
関数 を 用 いま す . ペー ジ の 指定 を 省略 する こと 
も で きま す が , その 場合 に は , その 直前 に PUT 
また は GET し た 次 の ペー ジ が 対象 と な り ま す . 
以上 の 説明 で は , 理解 し や すい よう に , ペー 
ジ と 呼ん で きま し た が , この 単位 は レコ ー ド と 
呼ば れ ま す . GET, PUT で どの レ ュ コー ド を 扱 
うか の 指定 を する こと を レコ ー ド ・ ナ ン バ ー の 
指定 と いい , 指定 を 省略 し た 時 の 値 は ,、 LOC 関 
数 の 返す 値 に 等 し いも の で す . 


の 26 識 。 (9 10Oj5 
LOF は ファ イル の 最大 の レコ ー ド ナン バー を 
返す 関数 で す . シー ケン シャ ルフ ァイル で は フ 
ァイル の 終り を EOF で 検出 し まし た が , ラン 
ダム フ ァイル で は LOF の 返す 値 が ファ イル 中 
の 最後 の レコ ー ド ナン バー で すか ら , そこ を フ 
ァイル の 終り と 考え て 操作 する こと に な り ま す . 
LOF 関数 は 次 の よう な 書式 で 用 いま す . 


LOF (ファ イル 番号 ) 
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ラン ダム ファ イル を 読む 時 に は , GET で LOF 
関数 の 返す 値 よ り も 大 き な レ コー ドナ ン バ ペー を 
指定 し て は いけ ませ ん . Input past end の ェ エ 
ラー に な っ て し まい ます . 逆 に ファ イル に 対し 
て の つき 足し を する 際 に は , LOF 関数 の 返す 値 
より も 大 きい レコ ー ド ナン バー を 指定 し て PUT 
を 行 な を ば 良い こと に な り ま す . LOF 関数 の 値 
は , フ ァイル を オー プン し た 時 に 決ま り CLOSE 
する まで の 間 , PUT を し ょ う が GET を し ょ 
う が 変 わり ませ ん . LOF は , ファ イル を ォ ー プ 
ン し だ た 時点 で その ファ イル の 大 き さ を 返す 関数 
な の で す . 


2. 6. 7 MKIS$, MKS$, MKDs 
フン ダム ファ イル に 書き 込む 時 に は , 文字 弄 
で な けれ ば な ら な いこ と は すでに 述べ まし た . 
で すか ら 数 値 デ ー タ は , 一 度 文字 型 に 変換 し て 
や る 必要 が あり ます . STRS 関数 を 使え ば 次 の 
ds20BsU 記 議 願 


RSET A$=STR$ (A) 


この 時 注意 し な けれ ば な ら な い の は , FIELD 
文 で 指定 し な けれ ば な ら な い , A$ の 領域 の 大 き 
さ で す . 変数 人 が 単 精 度 実数 型 で あれ ば 6 桁 の 有 
効 数 字 を 持ち ます か ら , 符号 と 小数 点 を 含め て 
8 文字 分 を 準備 し て お か ね ば な り ませ ん . 指数 
2S の K 剛 こさ 1 に は 指数 部 も 含め て 12 文 字 分 が 必 
要 と な り ま す . この よう に , 変数 ^A の と る 値 の 範 
囲 に よっ て A$ に 必要 な 大 き さ は 異な り ま すか ら 。 
いつ も 12 文 字 を 与え て いる と 領域 の 無駄 使い に 
な る こと も ある わけ で す . で すか ら , 数 値 か ら , 
文字 へ の 変換 の 結果 が 値 の 範囲 に か か わら ず , 
いつ も 同じ 長 さ を 持つ こと が 好ま し いこ と に な 
り ま す . この よう な 観点 か らち 。 ラン ダム フ ァ イ 
ル へ 数 値 を 書き 込む せ 時 に は MKI$, MKSS, 
MKD$ を 使っ イ て 文字 型 へ の 変換 を 行ない ます . 
BASIC の 数 値 デ ー タ は , 内 部 表現 で は , 整数 弄 


で 2 バイ ト , 単 精度 実数 型 , 倍 精度 実数 型 で は 
それ ぞ れ , 4 バイ ト , 8 バイト で 表わさ れ て い 
ます が (PC 参照 ,) これ ら の 関数 は 内 部 表現 の 
1 バイ ト を 1 文字 に 変換 する 働き を する の で す . 

これ ら の 関数 に よっ て 文字 に 変換 され た 値 を 
再び 数 値 に 戻す に は , 次 に 説明 する CVI, CVS, 
CVD を 使い ます . 


55SOIGVWUIGWSaIC ら VD) 
これ ら の 3 つの 関数 は , それ ぞ れ , MKIS, 
MKS$, MKD$ に よっ て 文字 に 変換 され た 数 値 
を 再び 数 値 に 戻す と き に 使い ます . 次 の 例 を み 
て 両者 の 働き を 理解 し て くだ さい . 
FIELH #1 ヵ 2 AE も)4 AE BE) 人 


AZ ニー32 リーー、2 5 に 韻 =1 2345678201 つ 4 ミ 
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LSET A$=MET$ も (AZ) 
LSET B=NKE ほ (BI ) 
LSET に も =NMEL も (に 半 ) 
FRINT CVI(A$) 
FRINT CVS(E$) 
FRINT CVH(C*) 


っ て いる わけ で すか ら , 正しく 数 値 に 戻す た め 
に は , MKS$ を 使っ た な ら ば 必ず CVS を 使っ 
て 戻さ な けれ ば な り ま せん . また , FIELD 文 に 
より 文字 変数 の 大 き さ を 割り 当て る 時 に は , 必 
ず 必 要 な だ け の スペ ー ス を 割り 当て る よう に 注 
意 し て くだ さい . た と えば 上 の 例 で C$ の 大 き 
さ を 5 に する と , 80 行 で の CVD に よる 変換 の 
際 に エラ ー と な っ て し まい ます . 


2. 7 る その他 


4 ま (G 可 明 I じ で きだ た 。 ステ デー トメ ント や 
関数 は , 全て ファ イル と いう 構造 に 対し て 働く 
も の で し た が ,Disk BASIC の 関数 や ステ ー ト 
メン ト の 中 に は 例外 と し て , ファ イル 構造 と は 
全く 関係 な し に , ディ スケ ッ ト そ の も の に 対し 


こ ル 4 


て 働く も の が あり ます . DSKIS と DSKOS の 2 
つが それ で す . この 2 つ を 使う に は , フロ ッ ピ 
ー デ ィ ス ク に 対し て , 正しい 知識 を 持っ て いな 
けれ ば な り ま せん か ら , まず 6 章 を 読ん で くだ 
さい . 


の 二 1U 当 EDSIKGIS 

DSKI$ は , ディ スケ ッ ト 上 の デー タ を 直接 読 
み と る と まき に 使う 関数 で , 指定 し た セク タ の 内 
容 か ら な る 文字 列 を 与え を ます. 1 セク タ は 256 バ 
イト で すか ら , 長 さ が 256 の 文字 列 と いう こと に 
な り ま す . 

DSKIS は 関数 で すか ら 普 通 決 の よう な 代入 文 
の 中 で 用 いま す . 


D$=DSKIS$ (1 18, 2 ) 


1 つの セク タ を 指定 する た め に , DSKIS 関 数 
は , ドラ イブ 番号 , トラ ッ ク 番 号 , セク タ 番 号 
の 3 つの 引数 を 必要 と し ます . 上 の 例 で は 1 番 
の ディ スク の トラ ッ ク 18, セク タ 2 の 内 容 を 読 
むこ と に な り ま す . ここ で 注意 し な けれ ば な ら 
な いこ と は , 左辺 の DB は ダミ ー の 変数 で ある 
と いう こと で す . 読み 取っ た デー タ は , 0 番 の 
バッ ファ 内 に 得 ら れ ま す . DSKIS と DSKO$ で 
は 常に 0 番 の バッ ファ が 使わ れる の で す . そこ 
で FIELD 文 を 使っ て , 0 番 バ ッ フ ァ を 文字 変 
数 に 割り つけ る こと に よっ て 読み 取り を 行ない 
ます . GET の 場合 と 同じ こと で す . 


10 FIELD #0, 128 AS A$, 128 AS 
BS$ 
20 D$=DSKIS (1, 18, 2) 


この 例 で は , A$ に 256 バ イト の うち の 前 半 の 
128 バ イト , B$ に 後半 の 128 バ イト が 入り ます . 

7 章 に は DSKI$ の 使用 例 が あり ます の で 参照 
し て く 〈 く ださい. 


2。 7. 2 DSKO$ 
DSKOS は ,。 ディ スケ ッ ト に 対し て 直接 書き 
込み を する た め の 文 で す . 


DSKOS 1, 18, 2 

上 の 例 で は ,。 1 番 の ディ スク の トラ ッ ク 18, 
ャ クタ 2 に 書き 込み を 行ない ます . 書き 込ま れ 
る の は 0 番 の バッ ファ の 内 容 で すか ら , 事前 に 
LSET, RSET で 書き 込む デー タ の 準備 と し て 
お か ね ば な り ま せん . 

DSKOS は 。 ファ イル の 構成 と は 全く 無関係 
に 独立 し て 書き 込み を 行なう こと に 注意 し て < 
だ さい つまり, 指定 し た セク タ が , 既存 の フ 
ァイル の デー タ を 保持 し て いる 場合 に は その デ 
ー タ が 失 な われ る こと に な っ て し まい ます 。, 特 
に トラ ッ ク 18 に は , BASIC が ファ イル の 管理 を 
行なう の に 必要 な 情報 が 入っ て いま す の で これ 
を こわ す と , その ディ スケ ッ ト 上 の デー タ が 全 
て 失 な われ る 危険 すら ちら あります. DSKO$ は 通 
常 の BASIC の プロ グラ ム を 作る に は 不要 な も 
の で す が , 使用 する 際 に は , 書き 込む セク タ の 
内 容 が 変わ っ て も か まわ な いか ど うか を 必ず 確 
認 し て くだ さい . 


5 晶 
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3. ] シー ケン シャ ルフ ァイル 


この 節 は , ファ イル の 内 容 を 調べ る ファ イル 
ダン ププ ログ ラム を 中 心 に , 数 値 デ ー タ , 文字 
デー タ が ディ スク へ どの よう に , 記録 され る か 
解説 し ます . 


3 の レダ ッ ン ジ / 

シー ケン シャ ルフ ァイル の 説明 を 進め て 行く 
上 で , どの よう に デー タ が ファ イル 中 に 詰っ て 
いる か を 見 る こと が で きる と , シー ケン シャ ル 
ファ イル の 人 性質 が よく 理解 で きる と 思い ます . 
そこ で , シー ケン シャ ルフ ァイル の 内 容 を , 16 
進 と ASCII 文字 で 表示 する プロ グラ ム の 例 を 示 
じ S31 し 52 

使い 方 : プロ グラ ム を 正しく 入力 し た ら , RUN 
し ます . ファ イル の 名 前 を 開い て きま すか ら , 
内 容 を 見 た ぃ ASCII 形式 の ファ イル 名 を 入力 し 
ます . する と , 左 に デー タ の 番号 が 16 進 で 表示 


5 紀 


「 さ ら に 詳し い オ ペレ ーション 」 


され , 中 間 に 16 進 , そし て , 右 に ASCII 文字 が 
表示 され ます . コン トロ ー ル 文字 は 表示 で き な 
い の で , “.” に 置き 換え て 表示 し ます . 

プロ グラ ム の 説明 : 16 進 を ゼロ サ プ レ ス せ ず 
に 表示 する た め に , 関数 を 2 つ 定 義 し て いま す . 
FNH1$ (XX) 関数 は 数 値 X を 16 進 2 ケタ の 文 
字 列 に 変換 する 関数 で あり , デー タ の 値 を 表示 
する の に 用 いて いま す . FNH2$(X) は , 数 値 
え を 16 進 4 ケタ の 文字 列 に 変換 する 関数 で あり , 
デー タ の 番号 を 表示 する の に 用 いて いま す . シ 
ー ケ ン シ ャ ルフ ァイル の 内 窒 を , 1 文字 ずつ 取 
り 出 し て 来る の に は , INPUT$ 関数 を 使っ て い 
ます . この よう に し て , EOF 関数 の 値 が 真 に な 
る まで , すなわち ファ イル の 終り まで くり か える 
し ます . この プロ グラ ム は , 横 40 の つも り で 書 
か れ て いま す , 横 80 で 使う に は , 240 行 の _ MOD 
8 を MOD 16 に , 230 行 と 250 行 の TAB 
(30) を TAB (54) に 変更 し て くだ さい . 


ーー 


1QQ / 

110 ′ file dumP 

120 上 

1SQ HEFFNH1$(X)=RIGHT$( "0 リ +HEX$ も (X)) 
140 HEFFNHS$(X)=RIGHT も ("000"+HEX ま ( X ) 」 4 ) 
15Q INFUT"file name"jiNI$ 

160 QFEN NM$ も FHR INPLT AS ##1 

17Q Ah=O 

1S80 A$="! 

185 PRINT FNHE ま も ま (AH)! "5 


Hi$=INFUT$( 1 1 ) 

FRINT FNH1$(ASE(E ま )) リ 9 "5 

IF Ii$ く ぐり ! THEN H ま =" 、" 

SS0 AD=AD+1 : 全 ま ニ A$ 十 中 

IF EQF(1) THEN FRINT TAE(SO)A$:ENLI 
IF Ah MOL S く >0 THEN 190 

FRINT TAB(SO) AA ま 

24Q GHTO 18O 


3. 1. 2 数 値 デ ー タ の 入出 力 


まず , 簡単 な 例 で 数 値 が どの よう に ファ イル 
中 に 書き 込ま れる か 実験 し て み ま し ょ う . 


1ist 

1QQ * 

110 ′ Numerical data file No.1 
120 / 

1SO HPFEN "test" FR ULITFLIT AE #1 
140Q FR 1=1 Tn 10 

150 _ FRINT #1」1jSGR( 1 ) 

14Q NEXT 

17Q CLOSE せ 1 

18E0 


21520 FEN "test" FHR TNFUT AS 1 
SO0 FQR 1=1 Tn 10 

ご 10 1NFILT 革 1)H1 TO 

=2O FRINT H1jT ウ 

2SO_ NEXT 1i 

240 ELOSE #1 

25O ? 

26O ENI 

員 ド 


この プロ グラ ム は , 1 か ら 10 ま で の 数 値 と 。 そ 
の 平方 根 を ファ イル に 書き 込み 。 その ファ イル 
の 内 容 を 読み な が ら , 画面 に 表示 する プロ グラ 
ム で す . プロ グラ ム の 説明 を し まし ょ う . 130 行 
で ファ イル を オー プン し ます 。 test? と いう 名 
前 の ファ イル を 作っ て ,#1 の バッ ファ を 通し て 
ディ スク に 書き 込む こと を 宣言 し ます .140 行 か 
ら 160 行 まで の FOR-NEXT ルー プ で , 1 か ら 
10 ま で の 値 と その 平方 根 を ファ イル に 書き 込 
み ま す . 150 行 の PRINT# 文 で 。 バッファ #1 に 
と りあ える ず 書 き 込 まれ , も し バッ ファ が 一 杯 に 
な っ た ら , 実際 


際 に ディ スク に 書き 込ま れ て , バ 


ッ フ ァ は 空 に な り ま す . 170 行 の close 文 で , > 
ッ フ ァ #1 の 使用 終了 を 宣言 し ます . こ の と きま 
だ バッ ファ に デー タ の 余り が あれ ば , ディ スク 
に 書き 込み ます . 次 に 読み 込み プロ グラ ム の 説 
明 を し ます . 190 行 で , “test? と いう 名 前 の ファ 
イル を 捜し て ,# 1 の バッ ファ を 通し て 読み 出す 
こと を 宣言 し ます .200 行 か ら 230 行 まで の FOR 
-NEXT ルー プ で , 前 に 書き 込ん だ デー タ を 読 
み 込 み ま す . 変数 D1 に が, 変数 D2 に SQR 
(1) が 読み 込ま れ ま す . 220 行 で , 正しく 読み 込 
まれ た か 画面 に 表示 する よう に し て いま す . 240 
行 の close 文 で , バッ ファ #1 の 使用 終了 を 宣言 
し ます . 実際 に RUN し て 。 プ ログ ラム が 正 し 
〈 働 いて いる こと を 確か め て み ま し ょ う ). 


ii 

1 1 

の 1 .414 ミ 1 
8 1 .7S2Z05 
4 っ 

6 の 

7 ダ ・ 

ウ コ 


正しく 働い て いる こと が わか り ま し た . 数 値 デ 
ー タ の シー ケン シャ ルフ ァイル を 使っ た 入出 力 
は この よう に 人 簡単 に プログ ラム で きま す . 

と ころ で , これ ら の 数 値 は どの よう に ファ イ 
ル の 中 に 書き 込ま れ て いる の で し ょ うか . PRINT# 
と いう ステ ー ト メン ト に よっ て 書き 込ま れる こ 
と か ら 想 像 で きる よう に , アス キー コー ド て で 記 
録 さ きれ て いる の で す . fdump プロ グラ ム て で 内 容 
結 2 太 みさ し + の 
QO00O SO 


SAO 


0010 
QO18 3 
Q020 20 3 


0040 る 
0048 タ 
QQO5O 3 
005S8 20 20 20 20 SO SG 


央 | 


BB ロ 


0040 2C 
00488 3 
0070 
007 品 
1916」 こ 10 計 ] 
008B 
0090 2 
0028 昌 
00A0 
00A8 
00BO 3 
00BB 
00CO 
00CB 0 
00IO 20 20 2 
00H8 38 


どう で す , 右側 の アス キー ダン プ の 部 分 を 見 れ 
ば , 数 値 が PRINT 文 で 画面 に 表示 され る の と 
同じ よう に 記録 きれ て いる こと が わか り ま す . 
で も , 空自 が 目 出 つの は どう し た こと で し ょ う . 
これ は , PRINT# 文中 の , 変数 間 の カン マ ~,” 
に 問題 が ある の で す . 


IE つつ 計 
い 
- 


づ 。1 


6228 .< 


PRINT #1, 1 SQR ⑪) 


こう する と , 1 を 書き 込ん だ 後 , TAB (15) を 
行っ て か ら , SQR ({) を 書き 込む の で す . し た 
が っ て , PRINT# 文中 の 変数 の 区 切り を “:“ 
に すれ ば , 余分 な 空 折 を な くす こと が で きま す . 


PRINT #1, I:SQR 人}) 
fdump プロ グラ ム で 確か め て み ま し ょ う . 


Fur"fdump" 


file 

Q000 ( 製 計 和 

QQ08 2 1.41 

QO10 2 21 ke 

Q018 1 .7320 
に 1 全 議 ん 
23607 


Oh 6 
どう で す , 前 より ずっ と 短 か く な っ た こと が わ 
か り ま す . し か し , さら に 気 に な る の は , アス 
クン クン 4 の ) 届 2 Cod 瑞 9 は: 二 の 6 進 少 4 


呈 1 


ンプ を 見 る と わか る よう に CR プ LF (キャ リッ 
ジリ クー ン ョ に ド のど ライ ポン シン 2 つ ド eg) 三村 な 還 0 
D と 04A) に 対応 し て いま す . PRINT 文 で 画 
面 に 出力 する と き に , 改行 する の は , この 2 つ 
の コー ド を 出力 ルー チン に 送っ て いる の で , 残 
り を 空白 で 埋め て いる わけ で は あり ませ ん . 画 
面 上 で 連続 し て 出力 する と き に そう し た よう に , 
出力 並び の 最後 に も `~:? を 付け 加え れ ば よい 
の で す . 


PRINT #1, 1I:SQR (⑪) : 


fdump プロ グラ ム で 確か め て み ま し ょ う . 


Fun"fdump" 
file 
QO0QQ 
Q010 3 
Q018 
0020 SI 
QQ28 
Q030 3 
00S8 
QQ40 < 
Q048 
QQ5Q Si 
QQSS 20 
0060 SS : 
QQ68 3 
0070 
0078 


どう で すか , 
7 に 
別 は 空白 1 つ で よい の に , 
す . 


前 より さら に 少し 短 か く な り ま し 
まだ 余白 が あり ます . な ぜ な ら , 数 値 の 区 
2 つの 空白 が あり ま 
これ は 数 値 が 普通 の PRINT 文 で どの よう 


て 符号 の た め の 空 折 
(負数 の 場合 に は 一 が 入る ) 


青 値 分 離 の た め の 空 白 が 
自動 的 に 付け 加え られ る 


に 表示 され る か を 考え て みれ ば 理解 で きま す . 
だ た と えば ぱ ば , 2 と その 平 坊 根 を プリ ント する 場合 
に は , 次 の よう な 構成 に な り ます. 

し た が っ て , この 例 で は , 数 値 す べ て 正 の 数 
で すか ら , 符号 の た め の 空白 が 余分 な の で す . 
STRS 関数 を 使え ば , 自動 的 に 付け 加え られ る 
空白 を 取り 除く ぐことができます,。 けれ ども , 符 
号 の た め の 空 白 が 残っ て いる の で , 数 値 を 分 離 
する こと が で きま す . 例 えば 次 の よう に し ます . 

PRINT# 1 , STRS (1]) : STRS$ (SQR (1) ) : 

fdump プロ グラ ム で 確か め て み ま し ょ う . 


Fun"fdump" 
file name? test 


0000 2Q 31 20 31 2 31 Ui 
0008 2E 34 3 .41421 3 
QO10 20 3 37 編 さ 35 1 .7SS05 
0018 20 3 1 る 移 で の 5 
0020 2E 3 6 。 .23607 6 る 
0028 20 3 に ご .44949 
0030 20 3 S5 7 、445 
0038 37 3 gtd 7 3 の 。 思 
0040 S2 SS 3 23 284S ウツ 3 
0048 20 3 3 ん 10 3。16 
0050 32 3 1 


この 方 法 は , 数 値 す べ て 正 の 数 で あっ た か ら 
可能 な の で あっ て , 負 の 数 値 の 場合 は 。 空白 部 
分 に マイ ナス の 待 号 が 入っ て し まっ て , 数 値 の 
分 離 が で き な く な り ま す . この よ う な 場合 は , 
自動 的 に 付け 加え られ る 空白 を その まま に し て 
お いて , 正 の 数 値 の 場合 は 符号 の 空白 を 取り 除 
ag 2 ( ら ( 厚 E8 3 た 
毅 値 デ ー タ の 読み 書き は , 次 に 述べ る 文字 デ 
ー タ クタ と 何 っ て , 特に 注意 し な けれ ば な ら な い 占 
は 無く , 安易 み プ ログ ラム で も , うま く 動 作 し 
ます . た だ , プロ グラ ム は 正しく 働い て いて も , 
た だ たいへん な , ディ スク の ムタ 使い を し て いる こ 
と が ある , と いう こと を 本 節 で は 注意 し まし た . 
と いっ て も , ディ スク の 消費 は クラ スタ 単位 で 
す の で , 見 か け 上 変わ ら な い 場 合 も あり ます . 
この よう を な 場合 で も ,。 アク セス 回 数 は は っ きり 
違っ て きま す . スト リン グ 関 数 を 持ち 出す こと 
は な い に し て も , 「,? と “j/ の 使い 方 に は 特 


己 ら 


に 注意 し て くだ さい 、. 

PRINT# は PRINT の よう に ディ スク に 書 
き 込 む 。 INPUT# は INPUT の よう に ディ ス 
ク か ら 読 み 込 むと 考え て も よい わけ で す が , 数 
値 の 場合 に は チョ ッ ト 違 いま す . INPUT# の 場 
合 は , 空白 を 切れ 目 と 見 な し まし た が , INPUT 
の 場合 は 空白 は 無視 され る の で す . 


3。 1. 3 文字 列 デー タ の 入出 力 
文字 列 を シー ケン シャ ルフ ァイル に 記録 する 
場合 の 注意 に つい て 述べ まし ょ う . 

数 値 デ ー タ と 同じ よう に , 文字 列 デ ー タ も 
PRINT 文 で 画面 上 に 表示 し た よう に , シー ケ 
ン シ ャ ルフ ァイル に 記録 きれ ます . 文字 列 デー 
クタ で 注意 し な けれ ば な ら な い の は , 数 値 デ ー タ 
と 違っ て 空白 は デー タ の 区 切り に は な ら な いと 
いう こと で す . これ は , 文字 列 デ ー タ の 場合 補 
自 宙 計 人 使 の た だめ です .。 し た が っ て , 次 の よう 
な プロ グラ ム で は , 思う よう に 働き ほ きま せん . 


100 ? 

110 。 Strins data fi]e No.1 

120 計 2 

1SOQ HFPEN "test" FHR HLITFLT AE #1 
140 FRINT #1」 "abc" def" 

1SO CLI ロ SE #1 

140 ? 


170 nFEN "test" FnR INFUT AS #1 
SO INPLT 1,A$ 

190 FRINT " 桂 "A ま り 村 " 

200 INFUT #1,E$ 

210 FRINT "VH$"#" 

220 CLOSE #1 

230 ・ 

240 ENI 

70 ロ PEN "test" FR INFUT AE 1 
1SQ INFLIT #1,A$ 

190 PRINT !"#"A$" 

200 INFUT #1E$ 

210 FRINT ""E$"#" 

220 CLOSE #1 


240 ENLI 
ロト 


この プロ グラ ム は , 文字 列 “abc” と い defP 
を , 文字 変数 A$ と B$ に 入力 し て プリ ント す 
る つも り で 書い た も の で す . それ ぞ れ の PRINT 
文中 の “は , 文字 列 変数 中 に どの よう に 代入 


され る か , 見 易く する た め に 付け て お きま し た . 
この プロ グラ ム を 実行 する と , 


Fun 
菩 ab と 

IriPut Past 
員 k 


Hf 
end in ZOO 


Fr "fump" 
file name? 
QQOQO 41 42 
O0008 SO 20 
0010 64 OH 


test 

463 20 2O 
20 20 2O 
QA 


20 2Z0 20 


2zO 64 6 ムコ de 


と エラ ー を 起 し ます . 2 つの 文字 列 が 空白 を 
は さん で 一 緒 に な っ て A$ に 読み 込ま れ て し ま 
い , B$ を 読も うと し た と き に デー タ が な く な っ 
て し まっ て , “Input past end? エ ラー が 発生 
し た わけ で す . この 例 で は デー タ が 2 つ で し た 
が , 多く の デー タ を 読み 込む 場合 や EOF 関数 
を 使っ て 不定 個 の デー タ を 読み 込む 場合 な ど は , 
一 文字 づつ デー タ が ずれ な が ら 読 み 込ま れ て , 
メチ ャ クチ ャ に な っ て し まい ます . 

これ を 解決 する 方 法 は , スト リン グ の 間 に CR 


LF を 入れ る , つま り , 2 つの 文字 列 を 2 つの 
PRINT 文 で 別々 に 書き 込め ば よい の で す . 


100 ? 

110 ′ Strirng data file No. ミ 

120 肖 2 

130 HEFEN "test" FR HLITFLIT AS #1 
140 FRINT #1,」"ahc" 

14 呈 PRINT #1, リ def 

15Q CLHSE #1 

140 ? 
D HPEN 
INFUT 
FRINT 
INFIT 
FRINT 
ELHSE 


tst て" 
1)A 
LE も FU 
1)B$* 
LEN エエ UE: 
#1 


FR INFLT AS #1 


ENI 


Furn'fdump" 

file name test 

0000 61 42 46S OLLOA 44 6 4 ahc。.。def 
OOQOB OH 0A は 

ロ ド 


到 ヨ 


と いう よう に ,。 うま く 代 入 さ れ ま | じ レ た * 
も う 一 つの 方 法 は , 文字 列 の 間 に , カン マ \ ィ / 
を 書き 込む 方 法 で す . 


100 7? 
10 2 
120..2 
1SO HFPEN "test" FHR HLITFIUT AE 芋 1 
140 FRINT 1 WahcO 0 03 Pdef リ 

150 ELHSE 苦 1 

GO 誠 2 

0 HPFEN 

INFIT 
0 FRINT 
INFLUT 
FRINT 
0 ELISEE 


) ENL 


Stririg.data file No. 


"test" FR INFLUT AS 革 1 
共 1)A ま 

9 替り AA も あり 提 

革 1」 HB 

ME に 

#1 


Fun "fdumpP" 


file namei test 
0000 61 42 43 SE 44 655 26 Oh abcydef。 
Q008 QA 


II 


し か し , 文字 列 中 に カン マ が 入っ て いる と , 
入力 の と き に , カン マ を 区 切り と みな し て し ま 
い , 文字 列 が 分 裂 す る こと に な り ま す . 


100 “? 
110 " 
120 * 
130 FEN "test" F ロ R QLITFUT AS #1 
140 FRINT 1jWaycB PPdifP 

15O CLOSE #1 


14Q 
170 ロ PEN "test" 

TNPUT #1A$ 
で @ PRINT LE て FL 
INPUT 1,E$ 
FRINT "PE あり 
CLOSE #1 


String data file No.4 


FR INFIUT AS #1 


ENH 


Fun"fdump" 

file namer test 

0000 61 SC 6S SE 64 S に 266 OH ajcjdj)f。 
QQOS QA o 

L ド 


これ を 解決 する に は , 2 つの 方 法 が あり ます . 
1 つ は , ディ スク に 書く 時 に 文字 列 を ク ォ ー テ 
ーション マー ク で 囲ん で お く 方 法 で す . 


1ist 

100 ? 

110 ′ String data file No. 玉 

1 ウ 0 全 2 

130 nHFEN "test! FOR _ ロ HTPUT AS #1 
135 GQ$=CHR$ も (34 ) 

140 FRINT 半 1) 避 お 3 リコ )C リ 5R お 5 愉 和 50d) 人 7 5 所 
150 CLOSE # せ 1 

140 / 

170 FEN "test" FR INPELIT AS #1 
180 INPLUT #1A$* ま 

120 FRINT " 革 『A$ も " せ ! 

ミ 00 INFUT #1,E$ 

マ 10 FRINT " 半 "EB ま " 持 『 

20 CLOSE #1 

459) 

ラ 40 EN 

ロト 

Fur 

革 ) C 后 

革 d)f 革 

ロ ド 


Fun "fdump" 
file name? test 
O000 22 61 2C 4 22 22 ム 44 2 
O0008 646 22 0 QA 
k 


UPFYIauLUP 記 


Yoo 


クォーテーション マー ク は 直接 書く こと が で き 
な い の で , 文字 変数 Q⑯ に クォーテーション 
ニン ク を 代 央 Ui 使う いま 33 証 ク ニー ジョ 
ンマ ー ク の ASCII コー ド は 34 で す . 

も う 一 つの 方 法 は , 入力 に LINE INPUT# 
文 を 使う 方 法 で す .LINE INPUT# 壇 は ,CR ン 
LF コー ド が 来る まで , 読み 込み ます . 
11st 
1OO / 

110 / String data file No. ム 


120 語 
130 HPEN "test" FR _ ロ UTFLT AG #1 


140 PRINT #1, "ac 
145 PRINT 生 1)"d,f" 

150O CLOSE #1 

140 ? 

170 ロ PEN "test" FOR INFUT AS #1 
180 LINE INPUT #1A$ 

120 PRINT ! 欄 !A あ もり 

っ OO LINE TNPUT #1 日 

210 FRINT !" 拉 "E も あり け 

る 20 CLOSE #1 

25Io) 2 

っ 4 の END 


ロ ド 


Fri 
井 る ) こせ 
昔 ロ )f 杜 
ロロ ド 


Fun"'fdump" 
file name“ 
QQO00 61 EC 
QOOB OH QA 
II 


test 


43 OD OA 64 ご ビ と を a ヵ に に に df 


特殊 な 場合 と し て , 英語 の 文章 な ど が あり ま 
す . 実際 の 文章 に は , CR ンプ LF コー ド , 引用 符 , 
カン マ な ど が 複雑 に 表 わ れ る の で 別 の 方 法 を 考 
asZi40 ば 2 まま ん 。 これ に は 。1INPUT$ 文 
で 1 文字 ずつ ディ スク か ら 読 まな けれ ば な り ま 
記 の 4 の に 8)f 放 も の と いう と 。 1 つ は 。 デ 
ィ ス ク に 書き 込む と き に , スト リン グ の 間 に そ 
の 文章 に は 出 て こない 文字 を 入れ て お く 方 法 で 
す . 例え ば , 0FF (16 進 ) な ど は , どの 文字 に 
も 対応 し ませ ん か ら , 使う こと が で きま す . 
も 2 ョ ョ つの 方 法 は , ディ スク に 書き 込む と き 
に , 一 諸 に その スト リン グ の 長 さ を 数 値 デ ー タ 
と し て お く 方 法 で す . この 方 法 を 使え ば , 特殊 
な 文字 を 使わ な く て も よい の で す . 


本 二 和 2 全 ジ シ ク ク / が フ アイ ルレ 
この 節 は , レコ ー ド 番号 に よる アク セス か ら 
は じ ま り , 名 前 に よる アク セス , その と まき 用 い 
られ る 対応 表 の 扱い . さら に 未 使用 と な っ た レ 
コー ド の 再 利用 な ど , ラン ダム ファ イル を 使う 
上 で , 基本 的 な テク ニッ ク を 説明 し ます . 

3. 2. 1 レコ ー ド 番号 に よる アク セス 
最も 簡単 な ラン ダム ファ イル の 使用 法 は , レ 
コー ド 番 号 に よる アク セス で す . 登録 番号 , 商 
品番 号 な ど , 数 値 に よっ て デー タ を 引き 出す 機 
会 は 多い と 思い ます . 後 で 述べ る 名 前 に よる 呼 
出し に くら べべ て , 登録 番号 と レコ ー ド 番号 が 1 
対 1 に 対応 する 場合 は も ちろ ん , その 他 の 場合 
で も レコ ー ド 番号 と の 対応 づけ が 容易 で ある の 
が 特徴 で す . その 一 例 を 示し ます . 


=! 


GO) 2 
OO / E:amPle 0f ac に ceg= by riumier 
7 


SO KILL "test" 


D nFEN "test リ AE 革 1 
ム 4QO FIELLI #1)H4 AS L$ 
=O FRINT 
INFUT "write or Fead リ 5 人 A ま 
200 IF A ま ="end" THEN ESQ 
10 INFILT "humEher"iN 
2 や 0 1F LEFT*(A$,1)="w" THEN ESEG 
) 5ET 拉 1jN 
25O_ FRINT "datai "iL* 
ん 0 RHTH 180 
SEO INFLUT "dataijH1 ま 
) LSET L$=L1 ま 
) FLIT #1 ヵ N 
D ET 18SO 


z 


D ELHSEE #1 
0 EN 

130 行 で 同名 の ファ イル を KILL し て お きま 
す . これ は , 後 で ファ イル の 成長 を 確か め る た 
めで す .150 行 で ファ イル を オー プン し ます . 160 
行 で , 文字 変数 D5 に バッ ファ を 割り 当て ます . 
34 文 字 を 与え て あり ます が , 特に 意味 が ある わ 
け で は あり ませ ん . 190 行 で . ファ イル に 書き 込 
む の か , 読み 込む の か 聞い て きま す . 200 行 で ^end" 
が 入力 され た ら , 終 り に な る よう に し て いま す . 
210 行 で 。 レ コー ド 番 号 を 入力 し ます . 入力 され 
で 始ま れ ば , 書き 込み それ 
以外 は 読み 出し と みな され ます .240 行 か ら が 読 
み 出 し , 280 行 か ら が 書き 込み で す . 文字 変数 D15 
は , INPUT 文 に よっ て 直接 バッ ファ に 書き 込 
め な い の で , LSET 文 に よっ て 代入 する た め の 
仮 変数 で す . INPUT 文 で D$ を 使う と , FIELD 
文 の 効果 が 無く な り ま す . 

この プロ グラ ム を 走ら せ て み ま す . 


た コマ ンド が `w? 


Fi 


write or readP 
rumEeri 1 
datai data1 


wr1ita or read 


hnmbheri 
datai 7 data 


BB 


WF1ite Or FEadP 
humher 1 
dataidata1 


write or Fead? 


rmier 
dataidata マ 


r 


write ar read ず 
rumtter コ 

IriPut Past end 1nm 
IS 


Fr 


ーー な 


1 番 , 2 番 と 書き 込ん だ 後 ,1 番 , 2 番 と 読み 込 
ん で 表示 し ます . 1 番 レ コー ド に 書き 込ん だ 内 
容 は "datal", 2 番 レ コー ド に 書き 込ん だ 内 容 は 
Ydata2? と いう , 短い も の で す . さら に , 3 番 
レコ ー ド を 読も うと すれ ば ,“Input past end? 
エラ ー, すなわち , 3 番 レ コー ド は 書い て な い 
の で 存在 し な い , ファ イル の 長 さ は 2 レコ ー ド 
と な り ま す . 

シー ケン シャ ルフ ァイル は , 連続 的 に し か 成 
長 し ませ ん が , ラン ダム アク セス ファ イル は 
レコ ー ド 番号 の 指定 の 仕方 に よっ て は , 不 連続 
に 成長 する こと が あり ます . も う 一 度 , 先程 の 
プロ グラ ム を 走ら せ て み ま し ょ う . 
write or FEag“ 


humberi ウツ 
datai data ウ 


F 


write or Feadi F 
numher 避 
atai 


wF1te or FEad デ 
nhumber" 5 
ata* 


F 


write ar readi r 
humtheri 10 
NO Fast end in EzO 
この 例 で わか る よう に , 間 を 飛ば し て いき な 
り 9 番 レ コー ド に 書き 込め ば , 間 の レコ ー ド に 
特に 書き 込ま な く て も , ファ イル の 長 さ は 9 レ 
コー ド に な り ま す . し た が っ て , 問 の レコ ー ド 
を 読み 出 そ う と すれ ば , 前 に 書い て あっ た ゴミ 
の よう な デー タ が 読み 出さ れる こと が あり ます . 
シー ケン シャ ルフ ァイル で は , ファ イル 生体 
に 有効 デー タ が 詰まっ て いま す が , ラン ダム フ 


ァイル で は , PUT# し な い レ コー ド の 内 容 は 昔 
の まま で , 特に 定まっ た 内 容 を 含ん で いま せん . 
し た が っ て , ラン ダム ファ イル に 初め か ら デ ー 
タ を 詰め て 書き 込む よう に する た め に は , PUT# 
する レコ ー ド 番号 を 変数 と し て , PUT# す る た 
びに 1 つ ず つ 増 し て いく よう に する か , または, 
連続 し て PUT# す る 場合 に は レコ ー ド 番号 を 省 
す れ ば , 自動 的 に イン クリ メン ト し な が ら PUT# 
する こと が で きま す . 

OPEN ! 

| ー な し 


PUT を 1, 1I 


ここ だ け 章 き 込 まれ る 


不 連 続 に 成 
E この 部分 は 昔 の まま 


この よう に レコ ー ド 番号 を 不 連 続 に 使用 する 
と , ラン ダム ファ イル も 不 連 続 に 拡大 し ます . 


3。 2. 2 ラン ダム ファ イル へ の 追加 
シー ケン シャ ルフ ァイル に 新しい 情報 を 追加 
する に は , ファ イル を オー プン する と き に , モ 
ー ド を for append と する こと で 可能 で し た . 
ラン ダム ファ イル の 場合 は どの よう に すれ ば よ 
い の で し ょ うか . 前 に も 説明 し た よう に , 新 し 
い レ コー ド を 追加 する た め に は , 前 に 作っ た フ 
ァイル の 最大 レコ ー ド 数 を 知る 必要 が あり ます . 
それ を 知ら せ て くれ る 関数 が LOF 関数 で す . 
ファ イル を 初め て 作っ た と き の LOF 関数 の 値 


に に! に) 


は 0 で す . この 関数 を 使う と き に 注意 し な けれ 
ば な ら な い の は , 前 に 作っ た ファ イル の 最大 レ 
コー ド 番 号 を 与え る の で あっ て , 現在 の ファ イ 
ル の 最大 レコ ー ド 番号 を 与え 0 る の で は な い の で 
す . つま り , その 値 は ファ イル を オー プン し た 
と き に 決ま り , ファ イル を クロ ー ズ する まで そ 
の 値 は 変化 し ませ ん . し た が っ て , LOF 関数 を 
正しく 使う に は , 例え ば 次 の よう に 使い ます . 


HO 語ら 
110 ′ Example.of access by numper 
20 還 2 
1S0O HFPEN "test" AS #1 
140 FIELL #184 AS L ほ 
15O_MAX=Ln ロ F(1 ) 
140 FRINT "MAX=" iMAX 
0) 語 
18QO FRINT 
1?0 INFIHT "write or read"i 人 も 
00 IF Ab="end" THEN 35O 
<10 IF LEFT$(A$)1)=" ゅ 0 THEN SEO 
0O ? 
gS0O INFLIT "numher"iN 
デ ご 40 GET #1jN 
SO FRINT "datai"jL ま 
40_ RBHTI 18SO 
MAX=MAX+1 


20 FRINT "numberi "5MAX 
3200 INFIUT "datai "jiH1 も 
310 LSEET L$=Li1$ 

FLIT 半 1jMAX 

30 BHTDI 180 

i5O ELHSEE #1 

360 ENIL 


IAX= 0 


write or read 
numherk 1 
Hatai? data1 


write or read 
humhers 
Hatai? 


ta 


write ar read? 
rumheri 員 


atai data 
write or read“ 
humber? 1 
ataidata1 


write or read Fr 
humber? 


atai data 


write or read 
品 E 


erid 


Fun 
AX= 
write ar readE Fr 
humberi 1 
atai dd ョ キョ ュ 1 
write or readP 
humheri 
ロロ atai ロロ ョ キュ a4 
write or readi W 
number = 
atai ata5 
write ar reEac" 
ErealL in 1 
ロト 
この 例 で , 変数 MAX は 現在 の 最大 レコ ー ド 
番号 で , 新しく レコ ー ド を 追加 する に は , MAX 二 


1 番目 の レコ ー ド を PUT すれ ば よい わけ で す . 


3. 2. 3 対応 表 に よる アク セス 

前 に 述べ た レコ ー ド 番号 に よる アク セス は , 
登録 番号 や 商品 番号 に よる 問合せ に は , 便利 で 
す が , 名 前 や 商品 名 に よっ て , 情報 を 取り 出す 
に は 不便 で す . な ぜ な ら , 名 前 と 番号 と の 関係 
を あら か じ め 知 っ て いな けれ ば な ら な いか ら で 
9 中 還 K の 67 だ (は も ちの パコ ンジ ピー テー ア 
に や ら せ れ ば よい わけ で す . すなわち , デー タ 
ファ イル を 用 意 し て , その 中 に 名 前 と 番号 の 関 
係 を 記録 し て お く の で す . プロ グラ ム の 最初 に 
この イン デック ス フ ァ イル を 読み 込ん で , 処理 


NMS 
name lllrecord | 
namel の デー タ は record 1 に 入っ て いる 
name 2||record 21 name 2 の デー タ は record 2 に 入っ て いる 
name 3 の デー タ は record 3 に 入っ て いる 
name 3llrecord 3 


name IN-| 


R 


2 
3 


N-| 
N 


reCOrdN-| 
「eCOrd Nl nameN の デー タ は recordN に 入っ て いる 


中 は メモ リ 中 の 対応 表 を 見 な が ら 処理 を 進め , 
変更 も メモ リ 中 の 対応 表 に 対し て 行ない , 処理 
が 終っ た ら , イン デック ス フ ァ イル と し て 再び 
ディ スク に 書き 込ん で お け ば よい の で す . イン 
デック ス フ ァ イル は , 始め に まとめ て 読み 出し , 
終り に まとめ て 書き 込む の で すか ら , シー ケン 
シャ ルフ ァイル を 使え ば よい で し ょ う . 

湊 に 対応 表 を どの よう に 引く か 説明 し ます . 
ます ず 考 えら れる 方 法 は , 前 の 方 か ら 順 々 に 比較 
じ で いく ぐ 注 法 で ず 。 

例え ば , 

JO 2 


110 / sgauen に 1 コ 1 Ba コ TF に ni 


20.“ 

130 NM$(N+1)=FEY$ も 

140 1=1 

15o TF NM$(i)=EY ま も THEN 1SQ 
140 1= ミ 1+1 


170 5HTI 15Q 

180 IF 1=N+1 THEN FCINL=O ELSE FLINL=ー1 
120 RETURN 
文字 配列 NMS (1) は , 対応 表 の 名 前 の 部 分 で 
す . 変数 N は , 名 前 の 総数 , 文字 変数 KYS は , 
探し て いる 名 前 で す . この サブ ルー チン は NM$ 
(N++ 1 ) に KY$ を 入れ て 番 兵 と し て いま す . 
こう する こと に よっ て , ルー プ の 中 で 1 と N を 
比較 する 必要 が な く な り ま す . ルー プ が 終っ た 
と き に , 1 の 値 が N 十 1 な ら ば , 対応 表 の 中 に , 
KY$ は 載っ て いな か っ た こと に な り , そう で な 
けれ ば , KY$ が 載っ て お り , その 配列 の 番号 が 
I に 入っ て いま す . し た が っ て , R (1) の 中 に 
求め る レコ ー ド 番号 が 入っ て いる の で す . 見 つ 
か っ た 場合 に は , 変数 FOUND に -1 を 代入 し 
て , 見 つか ら な か っ た 場合 に は , 0 を 代入 し て 
戻り ます . 

例え ば , 

1ao 

110 A seq に 11 SB ヨ TFCH 

SSGE 三 IRIS 

14C IF NH$(E)=EY ま THEN FCLNH=-1:RETLRN 
15o NEXT 1 


10 FIHILINL=Q 
17Q RETURN 


この サブ ルー チン で は , FOR-NEXT ルー プ 
を 使っ て , ルー プ の 益 了 条 件 を 判定 し て いま す . 
以上 の よう に 順 々 に 比較 し て いく 方 法 は , 要 
素 の 数 が 少な いと き は , 簡単 な 方 法 な の で す が , 
要素 の 数 が 大 きく な る と , 平均 の 手間 は 要素 の 
数 に 比 別 し て か か る よう に な り ま す . も っ と う 
まい 方 法 は な いで し ょ うか 。 それ は ,。 みな さん 
が 辞書 を 引く 《 く と きのこ と を 考え れ ば , 思い 当る 
は ず で す . 調べ た い 単 語 を 見 つけ る た め に 辞書 
の 第 一 ペー ジ か ら 見 て いき ます か , そん な バカ 
な こと は し て いな い は ず で す 。 まず お よそ の 目 
や す を つけ ます . た と えば ,「basic」 を 調べ た い 
な ら , "D” の 部 分 を 開き ます . そし て \ba? で 
始ま る 単語 。 “bas? で 始ま る 単語 と いう よう に , 
除 々 に 単語 の 数 を 減ら し て いっ て \basic? に た 
どり つく わけ で す . この よう な こと が で きる の 
は , な ぜ で し ょ うか . それ は , 辞書 の 中 の 単語 
が アル ファ ベッ ト 順 に な っ て いる か ら で す .\basic? 
は "b” で 始ま る 部 分 に 載っ て いて \a? や い \c? 
で 始ま る 単語 の 部 分 に は 載っ て いな い . \a? よ 
り 後 で "c” より 前 に 載っ で いる は ず だ , ba? 
は bb? より 前 , bas? は \bar? より 後 で 。\bat? 
ょ り 前 だ , この よう に し て 調べ る 必要 の な い 所 
は , 調べ ず に 目的 の 所 へ 行き 着く こと が で きる 
わけ で す . この 方 法 を 対応 表 に 使っ て み ま し ょ 
う . まず , 対応 表 を アル ファ ベッ ト 順 に し ます . 
も ちろ ん 新しく 作る の だ っ た ら 話 は 簡単 で すし , 
すでに 対応 表 が ある 場合 で も PC# 1 で 述べ た よ 
22 コ 2 シグ フウ ジグ ラム (SA つの 成 
ファ ベッ ト 順 に 並べ 直す こと が で きま す . 正確 
に 言う と, アルファベ ッ ト 順 と いう より は ,ASCII 
コー ド 順 と 言っ た 方 が よい か も し れ ま せん , こ 
れ は , アルファベット で す と アル ファ ベッ ト 順 
カタ カナ で す と , 小文字 の 一 部 を 除い て アイ ウ 
エ オ 順 で す . 別に こん な こと は どう で も よく て , 
単語 の 大 小関 係 が 一 意 的 に 決定 で きれ ば よい わ ゎ 
け で す . こう し て 順序 よく 並べ られ た 表 を 引く 
の に , 2 分 検索 (binary search) が よく 使わ れ 


ます . これ は , ハイ と イイ エ で 目的 を 見 つけ る 
も の で す . 例え ば , 次 の よう な 場合 で す . 


IAlelelplelrle 


この 中 か ら F を 見 つけ ます , まず , 真中 の D 
と 比較 し ます .D ょ より F の 方 が 大 きい ぃ の で 右 半 
分 に ある こと に な り ま す . 


真中 の F と 比較 し ます . こ れ で 見 つか り ま し た . 
つま り , 2 回 の 比較 で 見 つけ られ た わけ で す . 
も し , 順序 よく 比較 し て いっ た ら ど うな る で し 
[の 衣 隊 と 幸二 の た D と と F と 。 6 回 も 
比較 し な けれ ば な り ま せん . 一 般 に 2 分 検索 で の 
手間 は logz( 要 素 の 数 ) に 比 列 し ます . し た が 
っ て , 要素 の 数 が 多く な れ ば な る ほど , 大 き な 
差 が 出 て くる の で す . その プロ グラ ム の 一 例 を 
示し ます . 


CUG) 2 

42Q ′ binary search 

4SO ? 

440 L=0iI=N+1 

4S0 IF ロー し =1 THEN F ロ LINTI=O:RETURN 


440 NM=(LITL ) \? 

470 IF NM$ ま (M)=FEY ま THEN FnLINLI=-1 :RETHRN 

4SEO IF NM*(M)XEY$ THEN L=M ELEE =N 

420 RT 45O 

この サブ ルー チン は , 表 が 見 つか れ ば , 変数 
FOUND に し て , 変数 M に その 番号 を 入れ て 
帰り ます . も し , 表 の 中 に 見 つか ら な けれ ば , 

変数 FOUND に 0 を 入れ て 帰り ます . ここ で 、 
変数 上 と 変数 U は 今 調 べ て いる 区 間 の 上 限 と 
下限 で , 初期 値 は 上 = 0 及び U は 全 要 素 の 数 + 
1 を 入れ て お きま す . U と 上 の 差 が 1 に な っ た 
と いう こと は , その 区 間 の 要素 が で ゼロ, す な ゎ 
ち 見 つか ら な か っ た こと に な り ま す . 変数 M は 
区 間 を 2 分 し た 値 で , この 値 に 対応 する 要素 の 
大 き さ に 応じ て , 次 の 区 間 を M より 大 きい 部 
分 か , M より 小さ い 部 分 か 決め ます . ズバ リ M 
に 対応 する 値 が 一 致し た 場合 は , そこ で 
FOUND=-1 と し て 戻り ます . 次 の プロ グラ ム を 


B 


走ら せ て 見 る と , 2 分 検索 の 様子 が よく 理解 で 
きる と 思い ます . この プロ グラ ム で は , 表 の 要 
素 は 1 か ら 10 ま で の 数 字 で す , サブ ルー チン に , 
上 上 ,, U, M の それ ぞ れ の 値 を 表示 する 行 を 加え 
て あり ます . 


名 前 を 付け 足し て , 要素 が 一 つ 増 た こと に し て , 
ソー ティ ング サ プ ブル ー チ ン を 作っ て , アル ファ 
ベッ ト 順 に 並べ る . これ は , ソー ティ ング プロ 
グラ ム に よっ て は 時 間 が か か る し , その 名 前 を 
付け 加え る 前 は 完全 に アル ファ ベッ ト 順 で あっ 


た の で すか ら , な ん と か な ら な いも の で し ょ う 


MOX9 拓 2 
8 6 Einary search demo か . それ は 2 分 検索 アロ グラ ム を 使え ば 簡単 な 
130 N= ウ の で す . 検索 プア ログ ラム は , 名 前 が 見 つか ら な 


140 FCR 1=1 TH N 
15O NM$( 1 )=RIGHT$(ETR* ま (1) 1 ) 
140 NEXT I 


か っ た 場合 に も , 有用 な デー タ を 与え ます . す 
な わ ち , 名 前 が 表 に 載っ て な か っ た 場合 , 新 し 
い 名 前 の し か る べき 位置 は , 上 と U の 間 で あ 
る は ず で す . し た が っ て , U か ら 後 ろ の 全 要 素 

を 後 へ 1 つ ず つ ず らし , U の 位置 に 新しい 名 前 
=40 を 入れ れ ば よい わけ で す . 例え ば 次 の よう な プ 
<50 / birary search 


マフ 0 し =0 日 =N+ 1 
FRINT IEING し ニキ 日間 替り 5 し 晶 


180 INFIIT "numEer ViEY$ 

120 GSEILIE 25O 

=OQO IF FILINH THEN FRINT "found" 

210 IF NHT FLNLI THEN FRINT "not found" 
マダ Q FRINT 

マミ 0 GHTH 1SO 


0 IF 日 - し =1 THEN FILINLI=O iRETURN 220 * 
300 1=(LTL ) まう 230 ′ insert 
ミ 10 IF NM$(T)=EY$ THEN FLINLI=-1 :RETURN 240 「 
) IF NFM$(T)XEY$ THEN し =】 ELSE Li <S0 FRINT "insert" 
330 RnT ロ SEO 240 FHR 1I=N TH LISTEF'-1 


ご 70 NI$( エ +1 ) =NM ま (1 ) iR( エ +1 ) =R(1 ) 
2S0 NEXT 1 


Fun 0 N=N+1 :MAX ニ MAX+ 1 
RUOLNG 1 SOO_NM$( 日 )= ド Y$:R() =MAX 
三 9 Ll=10) ミ 10 RETLURN 

坦 三 電 く 四国 三 | 品 

三 守 0 中 目 三 

f ond 対応 表 へ の 挿入 


humbheri ミ 


幅 三 宣言 N 三 6⑪ 
杏 三 軍 ⑩ 川 三 当局 
fourid 

numheri 
三 浅 の 1 
己 (9 則 所 記 ) 
ニセ し L=5 
found 


number 4 


三 往 (G) HBYKG6) 

目 三 富 ⑩ 正 則 三 重 品 

= ll=5 対応 表 に came ! を 挿入 する 
記 湖 人 三 昌 55 

found 


すでに 登録 きれ て いる 単語 を 削除 する に は , 
その 要素 を メル スト リン グ に する の で は ダメ で, 
そこ を つめ て お か な けれ ば な り ま せん . な ぜ な 
ら , ヌル スト リン グ は 最も 小さ い 文 宇 列 要素 で 
すか ら , 表 の 途中 で 表 わ れ て は 2 分 検索 が うま 


対応 表 を アル ファ ベッ ト 順 に 作っ た 場合 , 新 
し い 名 前 を 登録 する と き に , し か る べき 位置 に 
入れ な けれ ば な り ま せん . それ は どの よう に す 
れ ば よい の で し ょ うか . 表 の 一 番 最後 に 新しい 


に に ) 


く ぃ きま せん . その 方 法 は , 前 の 挿入 と 似 て い 
ます . その 要素 か ら 後ろ を すべ て , 前 ヘー つづ 
つ ず ちせ ば よい の で す . 例え ば , 次 の よう な プ 
ログ ラム に な り ま す . 


jp 6 
330 ′ delete 


s50 FRINT "delete" 

=40 N=N-1 

370 FnR 1=N TU N 

s80 。 NI$(1)=NM$(】+1) 5R(T)=R( エ +1 ) 


390 NEXT 1 
400 RETURN 
対応 表 か ら の 削除 


対応 表 か ら d eer を 削除 する 


湊 の プロ グラ ム は , 入力 され た 文字 列 が 表 に 
載っ て いれ ば , ^delete* と 表示 し て , その 名 前 
を 表 か ら 削除 し , 載 っ て いな けれ ば insert* と 
表示 し て , その 名 前 を 表 に 加え ます . どちら の 


場合 も , 新しい 表 を 出力 し て 入力 待ち と な り ま 
お 


100 CLEAR 1000 
110 SIZE=100 
内 史 PiH RM$(SIZE),R(S12E) 


19 PRINT 
1SO INPUT “ 0 5sKYs 
160 60SUB 4 
17O 1F FOUND THEN GOSUB 3 
1S0 FOR 1=1 TO N 
120 FRINT NM も (1),R(T) 
200 NEXT 1 
210 GOTO 140 


20 ELSE GO0SUB 230 


nsert 


RIRT "insert" 
26 05 ji=N TO リ り STEP 
15 (1+1) =NHS も (本): 記 1)=FR( 1】 ) 


前 TO ト 
の Wit)det1ci: RR( 1)=R( 】 ィ 1 ) 


あき 4 コ 6 き 


410 ・ 
339 ” binary search 


20 し =OiU 
3 IF U-| et Jin FQUND=O:RETURN 
O NM=(U+| 
420 IF Mt (ha KY$ THEN FOUND=-1 : RE MR 
4SQ 1F NM%(H) く <KY$ THEN し =M ELSE ! 
4S0 GOTQO 450 


以上 の よう な 構造 は , 単純 で し か も 検索 が 束 
い の が 特徴 で すす. し か し , 挿入 と 削除 で は , ア 
ー タ その も の を 移動 する の で 時 間 が か か り ま す . 
し た が っ て この よう な 構造 は , 後 で 紹介 する 「 矢 
書 」 プ ログ ラム に 使わ れ て いま す . 辞書 は 引く 


も の で すか ら , 検索 は 速 27 化 ば 交 ち み n の 
で す が , 挿入 は 初め に ー タ を 入力 する と き 以 
外 は , ほとん ど 行 な われ ませ ん し , 削除 する こ 


と は , ほとん ど な い か ら で す . 
検索 が 速く , 挿入 削除 が 容易 で ある , そん な 
科 MEN も る の が Se 


に CE 


挿入 と 削除 を 容易 に する に は リス ト 構 造 が 
あり ます . リス ト 構 造 は , 配列 中 の 位置 で は な 
〈 て , その 名 前 に 対応 する ポイ ンタ に よっ て 大 
序 が 決っ て いま す . し た が っ て , 配列 の 第 一 要 
素 が 最も 小さ な 要素 と は か ぎ ぎり ませ ん , 最も 小 
さ な 要 素 は , ポイ ンタ 変数 TOP に よっ て 示 き 
れる の で す . TOP に よっ て 示さ れる 要素 の ポイ 
ンク を 調べ る と , 次 の 要素 を 指し て いま す を 
し て , その 要素 の ポイ ンタ を 調べ る と その 決 の 
要素 を 指し て いる と いう よう に , イモ ズル 式 に 
要素 を た どる こと が で きる の で す . 最後 の 要素 
に 対応 する ポイ ンタ に は , 最後 を 示す 特別 な 値 
を 入れ て お きま す . 例え ば , 配列 を 添字 1 か ら 
使用 すれ ば , ゼロ が 最後 を 示す よ うに 決め る こ 
と が で きま す . 図 で は これ を , アー ス 記 号 で 表 
現し て いま す . 図 で 説明 すれ ば , TOP に 入っ て 
いる 値 は 1 , この 場合 は 配列 の 第 一 要素 と り ぇ 
ト の 第 一 要素 が 一 致し て いま す . そし て , ant の 
ポイ ンタ に は 2, すなわち bear を 指し て いま 


プロ 


す . 同様 に し て bean の ポイ ンタ に は 3 が , deer 
の ポイ ンタ に は 4 が , eagle の ポイ ンタ に は 5 が , 
そし て , frog の ポイ ンタ に は 0 が , 入っ て いる 
の で す . リス ト 構 造 の 場合 新しい 要素 の 挿入 は 
簡単 で , 例え ば , camel を 挿入 する 場合 , camel 
自身 は 配列 の 後に 付き ます が , bear の deer を 
指し て いる 矢印 を 切っ て , すなわち , bear の ポ 
イン タ を camel に , camel の ポイ ンタ を deer 
に すれ ば よい の で す . 要素 の 削除 も 簡単 で , 削 
除 し た い 要 素 を 指し て いる ポイ ンタ を , 削除 し 
た い 要 素 の 指し て いる 値 に 書き 変え た れ ば よい の 
で す . 例え ば , deer を 削除 する 場合 は , deer を 
指し て いる 要素 すなわち camel の ポイ ンタ の 値 
を , deer が 指し て いる 要素 .、 すなわち eagle に 
書き 変え れ ば よい の で す . 挿入 , 削除 で 注目 し 
て ほし い の は , 要素 自身 は 配列 中 を まっ た く 移 
動 し な いで , ポイ ンタ を 書き 変え て いる だ け だ 
と いう こと で す . これ は , 前 の 配列 構造 と 大 き 
〈 異な っ て いま す , 前 の 構造 で は 配列 の 前 の 方 
で 挿入 , 削除 が 起 っ たら , た い へ ん な 数 の 要素 
を 移動 し な けれ ば な り ま せん . し か し , リス ト 
構造 の 欠点 は , 二分 検索 が 使え を な いこ と で す . 


リス ト 構 造 に よる 挿入 


top 


対応 表 に ocamel を 挿入 する 


プ 1 


し た が っ て , 逐次 検索 を 用 いな けれ ば な ら ず , 
検索 は 遅く な り ま す . 


リス ト 構 造 に よる 削除 


(どこ か ら も 


対応 表 か ら dear を 削除 する 


3. 2. 4 ゴミ レコ ー ド の 再 利用 

今 ま で の 説明 で , 対応 表 の 使い 方 は 理解 で き 
た と 思い ます . 削除 が 行なわ れ な けれ ば , レコ 
ー ド 番号 の 若い 順に PUT し て いく の て で 未 使用 
レコ ー ド は 発生 し ませ ん . と ころ が , 削除 が 行 
な われ る と , その 名 前 に 対応 し た レコ ー ド は , 
どこ か ら も 指 さ れ な い レ コー ド , すなわち , ゴ 
ミレ コー ド に な っ て し まう の で す . 削除 が 頻繁 
紀 起 きる よう な の プログ ラム で は 。 ご の 選 だ 3 クラ 
ー ド が 大 量 に で き て し まい , ディ スク 上 は ゴミ 
の 山 と な り ま す . その よう な こと に な ら な いよ 
うに する に は , どの よう に すれ ば よい の で し ょ 
25 

第 一 の 方 法 は , レコ ー ド の 使用 状況 を 記録 し 
て お く こ と で す . この 方 法 は , 最大 レコ ー ド 数 
の 配列 (使用 表 と で も 呼ん で お きま す ) を 用 意 
し て , 使用 し た レコ ー ド に は , 対応 する 配列 要 
素 に , ある 数 を 入れ て 印 を 付け て お きま す . も 
ちろ ん 逆 に , 使用 し て いな い レ コー ド に 印 を 付 
け て お いて も か まい ませ ん . 新しく レコ ー ド を 
使用 する と き は , この 使用 表 を 調べ て , も し 未 
使用 レコ ー ド が あっ た ら , その レコ ー ド を 使用 


指 さ れ て いな い ) 


し , を な か っ た だ たら, は じ め て 新しい レコ ー ド を フ 
ァイル の 最後 部 に 付け 加え ます . そ の と き に は , 
使用 表 の 要素 を 一 つ 増 し て , 印 を 付け て お きま 
す . 削除 に よっ て , 未 使用 と ど な っ た レコ ー ド は , 
それ に 対応 する 使用 表 の 要素 の 印 を 消し て お き 
ます . これ で , まだ 未 使用 の レコ ー ド が ある 場 
合 に は , ファ イル を 拡張 せ ず に , デイ スク を 有 
効 に 使え を ます. それ で は , その 一 例 を 示し まし 
放 ヴ 。 


100 ! 

HO 

j じ 20) 2 

1380 ELEAR 1000 

140 S1ZE=100 

150 HIM NM$(E1ZE))R(EIZE ) 」LISEEHI( 呈 1ZE ) 

140 ? 

170 FRINT 

180 INFUT "name "ji に KY も 

190 ELHELIB 5SO 

3200 IF FLUINH THEN GHSLE 4SO ELEE GELIE 
=70 

210 IF N=O THEN SEO 

2z0 FHR 1=1 Tn N 

230 FRINT NM$( 1 ) ,R( 1 ) 

240 NEXT 1 

250 RhTU 170 

みな 0 属 2 


us5ed maP demo 


riSert 

50) の 

220 FRINT "insert" 

300 FHR 1=N TI L TEF -1 

= NM も ( エ +1 ) =NI$ も ( 【) :R( エ +1 ) =R( 1 ) 
NEXT 1I 

33 コ 0 N=N+ 1 

ミ 340 NM も (日 )=RY も 

人 9) の 

0 =1 

70 1F LIESEH(I) THEN 1=1+1 :GnTn ミ 70 
3BO ITF 1 ニ =FHAX+1 THEN FAX= ニ MAX+1 

3 ウツ 0 UEEH( T ) = ニー] 

4060_R(H)= ェ 

410 RETLRN 


420 / 

430 ′ elete 

440 ? 

45 FRINT "delete" 
440 NN=N-1 


4709_ IEEL(R() ) = 

480 FUR T= TH N 

420 NM*(1)=NM$(1+1):R(T)=R(1+1) 
500 NEXT rf 了 

510 RETLURN 

ay26) 

520 / binary Searchi 

540 ?^ 

550 上 し = ニ Oi ロニ N+ 1 

540 IF ロー し =1 THEN FLNLI=O iRETIHRN 
570 =( 昌 ナオ ) 

580 IF NM*(M)=KY$ THEN FOUND=-1:RETURN 


5 ゥ CO IF NM$ も (M)XKY$ THEN L=M ELSEE Ll=N 
400_GHT ロ 560 

この プロ グラ ム は , 対応 表 の 説明 で 使用 し た 
も の に , ゴミ レコ ー ド 処理 を 加え た も の で す . 
配列 USED は , 使用 表 で , 使用 中 の レコ ー ド 箇 
号 に 対応 する 要素 に は 一 1 が 未 使用 の レコ ー ド 
番号 に 対応 する 要素 に は 0 が 入り ます . 挿入 サ 
プ ブルー チン に 新しく 加わ っ た の が , 360 行 か ら 390 
行 で す . 使用 表 を 1 っ 1 っ 調べ な が ら 要 素 が 0 
で ある 番号 を 探し ほ ます. この ルー プ ' に は 上 限 の 
判断 が あり ませ ん が , 配列 を 宣言 する と き に , 
すべ て の 要素 に 0 が 代入 され る の で , すなわち , 
すべ て 未 使用 状態 た な っ て いる の で , そこ で え 
トッ プ し ます . そし て , 未 使用 の レコ ー ド 鼻 号 
が , 変数 に 入っ て ルー プ を 終り ます . 変数 1 
が 最大 レコ ー ド 番号 十 1 で あっ た ら , 未 使用 レ 
コー ド が 存在 し な か っ た こと に な り ま すか ら , 
最大 レコ ー ド 番号 を 更新 し ます . 使用 し た レ ュ 
ー ド に 対応 する , 使用 表 の 要素 に は 一 1 を 代入 
し て お きま す . 削除 サブ ルー チン に 新しく 加 ゎ 
っ た の は , 470 行 だ け で , 未 使用 に な っ た レコ ー 
ド に 対応 する 要素 に 0 を 代入 し ます . 次 に , こ 
の プロ グラ ム を 走ら せ た 結 果 を 示し ます . 


hame: A 
insert 
に 1 


iame イ ? 量 
1iSert 
B る 


hame イ ビビ 
insert 


ri 由 ア 
Ti トコ トー 


name 
insert 
1 


B 
(G 
1H| 


Tr トー 


hame? ピ 
irisert 


E 
p 


DO CE ニコ 


アー 


h 4 
) 
name? に ビ 

delete 

に 1 1 
B | 
由 4 
E に 1 
nhame? 中 

delete 

A 1 
に 1 ウ 
E に 1 
hame? F 

insert 

A 6 
B 2 
E 
F 3 
hame? ロ 

insert 

1 は 
に 1 る 2 
E 紀 
F < 
1 4 

名 前 を A, B, C, D, E と 順番 に 登録 し て , 


て 46 る れ 和 5 記 25= 3。 4。 5 の レコ ー ド 番号 
が 与え られ まし た . 次 に , C と D を 削除 し て , 3 
と 4 が 未 使用 レコ ー ド に な り ま し た . 次 に F と 
G を 登録 し ます が , 未 使用 レコ ー ド が ある の で , 
その レコ ー ド 番号 が 与え られ まし た . 


第 2 の 方 法 は , リス ト 構 造 を 使用 する も の で 
す . 前 の 方 法 で は , 使用 表 を は じ め か ら 調 べ て 


行か な く て は な り ま せん . この よう な ムダ を せ 
ず に 未 使用 の レコ ー ド を すぐ に 見 つけ られ る よ 
うに し た いも の で す . そこ で , 未 使用 レコ ー ド 
のり XiIEIUG 記 つが な がけ 3 おく よう に し ます 9. 
この リス ト を 空 レ コー ドリ スト と 呼ぶ こと に し 
ます . 具体 的 に は , や は り 最 大 レコ ー ド 数 の 一 
次 元 配列 を 用 意 し て , 対応 する 配列 の 中 に , 次 
の 空 レ コー ド の 番号 を 入れ て お きま す . 最後 の 
レコ ー ド に は , 特別 な 値 を 入れ て お きま す . 空 
レコ ー ド が な く な っ て し まっ た ら , は じ め て 新 
し い レ コー ド を , ファ イル の 最後 部 に 付け ます . 


フ ヨ 


276 * 
280 * 
290 FRINT 


100 ? 


/ free 1ist demo 


CLEAR 1000 
S1ZE=100 
DIM NM$(SIZE),R(SIZE))FL(SIZE ) 


FRINT 
INFUT "name "3KY ま 
GnSLIB 490 
IF FuLUND THEN GUSLUB S2O ELSE GSLUBE 270 
IF N=QO THEN 2SO 
FnR 1=1 Tu N 
FRINT NM ま ( 1)jR(1 ) 
0 NEXT 1 
0 GTQ 170 


irnisert 


"inseTt" 
D FIR 1=N TH LI STEP -1 


NM*(T+1 ) =NIM$( 1 ) iR( エ +1 ) =R(1 ) 
NEXT 1 
33O N=N+ 1 
40 NM$( 日 )=KY ま も 


IF FR THEN R(LUI) =FR: FR=FL( FR ) 
ELSE MAX=MAX+1: R(II)=MAX 
RETLRN 
/ delete 
FRINT "delete" 
N=N-1 
0 FL(R(NM) )=FR: FR=R(N) 
FnR 1I=M TH N 
NM も ( 17=NM$( エ +1 ) iR(T)=R(T エ +1 ) 
NEXT 1 
RETLRN 


/ binary search 
7 


し L=0iU=N+1 

IF LU-L=1 THEN FQLIN=OIRETLRN 
MM=(U+L ) \2 

IF NM$(M)=KY$ THEN FOUN ロ =-1 :RETLURN 
IF NM$(M) く KY$ THEN L=NM ELSE U=N 
GOT0 520 


リス ト を 記憶 する 配列 は FL で す . 挿入 サ プ 


ルー チン の 追加 は , 360 行 で す . 変数 FR は , 未 
使用 レコ ー ド リス ト の 先頭 を 指し て いる ポイ ン 
タ で , その 値 が 0 で ある と き に は , 未 使用 レコ 
ー ド が 存在 し な いこ と を 示し て いま す . 削除 サ 
ブルー チン の 追加 は , 430 行 で す . 未 使用 と な っ 
た レコ ー ド 番号 R (M) を 未 使用 リス ト の 先頭 
に 加え ます . 


次 に 実行 結果 を 示し ます . 


name: 合 

insSert 

に } 
name: 

insert 

に 1 1 
E マ 
nhame: ビ 

insert 

合 1 
に 1 る 
に る 
namez 

insert 

1 

E マ 
(5 四 ] 
hi 4 
name? 

insert 

全 1 
に ) 2 
に に 
1 し 1】 
E に 
hame? 

delete 

1 1 
E ラ 
Ii 4 
E 
name? 日 

delete 

合 1 
BE ピコ 
E に 
ame? F 

iriSeFt 

1 1 
の 2 
ヨ 5 
F 4 
name? ロ 

in5Er エ 

合 1 
選 用 
らら 0 
F 4 
ロ コ 


前 と 同じ よう に , AーE を 登録 し た あと に , C と 
D を 削除 し , その 後に F と G を 新た に 登録 し 
で て いま すみ , ここ で 注意 し で ほし い の は FR と G 
に 割り 当て られ た レコ ー ド 番号 で す . 前 の プロ 
グラ ム で は , F に 3 番 ,G に 4 番 が 割り 当て ら 


れ ま し た が , 今度 は その 逆 に な っ て いま す . こ 
れ は , リス ト を 作る 手順 を 考え て みれ ば 理解 で 
さ $ ま 9 応 


空 レ コー ドリ スト 


free この 例 で は 全 レ コー ド 数 は 15 個 , 今 , 3 番 , 
5 番 。 6 番 , そし て Il 番 の レコ ー ド が 空い て 
いる . 


1 2345678910 12 13 14 15 
ノン 


レコ ー ド の 数 だ け 用 意 する 


前 の 状態 か ら , 新しく レコ ー ド を 使い た い 場 


どっ 
free 馬 竹 また どる と 。 3 が 見 つか る そこ で 
3 を 使う そして, free の 値 は 5 に な る . 
この よう に し て , 空 レ コー ドリ スト を 消費 し 
EGG 


1 2 345678910 志 12131415 


前 の 状態 か ら , 未 使用 ヒコ ー ド が 発生 し た 坦 
合 は , 
free free と 5 番 と の 間 に , 今 , 未 使用 に な っ た |I4 
番 と の 間 に , 1I4 番 を 挿入 する . 


123456789101213 1415 


アイ ス ! 


第 3 の 方 法 は , スタ ッ ク 構 造 を 使う も の で す . 前 の 状態 か ら , 未 使用 レコ ー ド が 発生 し た 場合 は , 


前 の 2 つの 方 法 で は いづ れ も , レコ ー ド 数 だ け free 
の 配列 を 用 意 し を けれ ば を り ま せん で し た . 後 隊 


で 述べ る よう な , レコ ー ド 間 の リン ク が ある 場 

合 に は , 配列 を 共用 で きま す が , な い 場合 に は , 

特に 全 レ コー ド 数 が 多く て, 未 使用 レコ ー ド が 

少な い 場 合 に は , ムダ が 多く な り ま す . そん な |315|6|14 
場合 に は , 未 使用 レコ ー ド の み を 保存 する 配列 2 中 
を 用 意 し て お け ば よい の で す 。 も ちろ ん 。 配列 この 例 で は , 14 番 の レコ ー ド が , 未 使用 ヒコ ー ド に な っ た こ 
に 必要 な 記憶 領 域 は , 始め に 確保 し て お か な け 

れ ば な り ま せん , し た が っ て , 実際 に 主 記憶 を 次 に プロ グラ ム を 示し ます 。 

占有 する 量 は 変わ ら な い 場 合 が あり ます , と い 100 ・ 

90 評 2326 肖 示 ずる な ら 。 作り 直 じ た 方 が ま 156 "7 PCK deme 

し な の で す . 130 CLEAR 1000 


140 SIZE=100 
1SO HIM NM$(SIZE),R(SIZE ) 」F ミ (51ZE) 


と を 示し て いる . FREE の 値 は , 今 . 14 が 入っ て いる . 


140 
空 レ コー ドス タッ ク 170 FRINT 
MS 18O INPUT "name"iEY$ 


1920 RISILIE 4S0 

SQ0 IF FQLINI THEN GHSLUR S90 ELSE GCSLIB 270 
0 IF N=Q THEN SSQO 

FIR 1=1 TH N 

9 FRINT NM$(I)jR(1 ) 

Q NEXT 1I 

0 GHTU 170 


/ 


insert 


free stack 
この 例 で は , 前 と 同じ 様 に 。 3・5・6・ 中 
番 の レコ ー ド が 空い て いる . free の 値 は , 今 
4 が 入っ て いる . 


0 FRINT "insert" 
FR 1I=N TI LISTEF -1 
NM$(T+1 ) =NM$( 1 ) :R( 1 エ +1 ) =R( 1 ) 
i20 NEXT 1 
GO _N=N+1 
NM$ ま (Ll) =RY$ 


IF FR THEN R(LI)=FS(FR) : FR=FR-1 


前 の 状態 か と 二 EN ELSE MAX=HAX+1: R(HI)=HAX 
2 状態 か ら , 新しく レコ ー ド を 使い た い 場 370 RETURN 
Ss 380 7 
free 3wO / delete 
400 
410 FRINT "delete" 
420 N=N-1 


430O FR=FR+1: FS(FR) =R(N ) 

440 FIR 1=N TH N 

450 NM ま ( 1 ) =NM$ も ( エ +1 ) :R( 1 )=R( 1+1 ) 
440 NEXT 1 

470 RETILRN 

4S0 ? 

490 ′ hinary search 

5QQ ? 

この 例 で は , 日 番 の レコ ー ド が , 使用 され る 510 し =0O iL=N+1 人 

ミ と に な っ た こ 示 ヽ 520 1F LU- し =1 THEN FILINI=0* LR 
se 。 っ KEI 

40 5 1 40 IF NM$(M)=R ド Y$ THEN F ロ LIN ニー-1:RETILRN 
55Q IF NM$(M)XRY$ THEN L=M ELSE Ll=N 
SeQ RT S2Q 


free stack 


アオ コ ) 


配列 FS が 空 レ コー ドス タッ ク で , 変数 FR 
が 空 レ コー ドス タッ ク ポイ ンタ で す . 挿入 サブ 
ルー チン へ の 追加 は , 360 行 の み で す . 変数 FR 
の 値 が 0 で ある と き は 空 レ コー ド が な いこ と を 
示し て いま すか ら , MAX の 値 を 更新 し て ,。 フ 
ァイル を 拡大 し ます . 変数 FR の 値 が 0 で な い 
と き は , 空 レ コー ド が 存在 し て いる こと を , 示 
し て いま すか ら , その 値 を ポッ プ し て 。 ス タッ 
ク ポ イン タ の 値 を 一 減ら し ます . 削除 へ の 追 
加 は , 430 行 の み で す . スタ ッ ク ポ イン タ の 値 を 
1 つ 増 し て , 空 に な っ た レコ ー ド 番号 を スタ ッ 
ク に 積み ます . これ を 実行 する と , 空 リ スト の 
場合 と 同様 な 結果 が 得 ら れ ま す . 


3. 2。 5 レコ ー ド の 分 割 

ラン ダグ ム アク セス ファ イル の 最大 の 目的 は 。 
高速 の 呼び 出し で す . その た め に , 固定 長 レコ 
二 リリ ( マ 有 っ 22 ル JE 80 - レ 喧 避 
参照 ) が 用 いら れ て いる わけ で す が , 固定 長 レ 
コー ド で は , 各 レ コー ド に あま り の 領域 が で き 
る こと が 多い の で す , 例え ば , 1 レコ ュー ド が 1 
人 の 人 間 の 情報 を 記憶 する の に 使わ れ , 1 レコ 
ー ド の フィ ー ル ド を , 次 の よう に 決め た の で は , 
256 バ イト 中 116 バ イト も 無駄 に Ce る あめ (。 
な り ぼ |3。 


名 前 | 住所 | 電話 | 職業 | あま り 
ご 
24 RU 別 。 還 116 


まあ , どう し て も , 名 前 は 20 文 字 , 住所 は 50 文 
字 , 電話 は 20 文 字 , 職業 50 文 字 必 要 な ら ば 話 は 
列 で す が , 何と か な ら な いも の で し ょ うか . こ 
の 例 で は , 140 バ イト 必要 な の で す が , どれ か を 
少し 減ら し て 128 バ イト に すれ ば , 1 レコ ー ド に 


2 人 分 入れ られ る よう に で きそう で す .。 そこ で 


次 の よう に 変更 し ます . 


() 


| I ク ョ k 選 


45 2 


名 前 は 短 か く な る と 気分 の 悪い も の で すか ら そ 
の まま , 住所 を 5 文字 , 電話 を 2 文字 , 職業 を 
5 文字 削っ て み ま し た . ここ で は , 例 と し て 決 
め た だ け で , 実際 に は よく 調べ て か ら 決 め な い ぃ い 
と 後 で 困り ます . と いう わけ で , 何と か 128 文 字 
に 詰め 込む こと が で きま し た . 次 の 問題 は , 名 
前 と レコ ー ド 番号 の 対応 で す . 1 レコ ー ド に 1 
人 の 情報 を 記憶 きせ た 場合 は , レコ ー ド 番号 と 


人 間 は 1 対 1 に 対応 し て いま し た が , 1 レコ ー 
ド に 2 人 の 情報 を 記憶 させ た 場合 は , 1 対 1 対 


応 が 成立 し ませ ん . そこ で 考え られ る の は , 今 
まで の レコ ー ド 番号 を 2 倍 し て , 偶数 は 前 半分 , 
奇数 は 後半 分 と 対応 させ る 方 法 で す . こう すれ 
ば , 人 間 の 番号 と その 人 の デー タ が 1 対 1 に 対 
応 す る こと に な り ま す . 例え ば , 


100 /" 

層 S3 *。 divided record demo 

130 OPEN "test" AS 1 

140 FIELD ##1, 20 AS NO$, 45 AS AO$, 18 AS TO$,。 4S AS COS ょ 
20 AS N1$, 45 AS A1$, 18 AS T1$,。 45 AS ロ 1 る 


160 PF 

170 1NPOT* read or write"iANS 
180 1F AN$="end" THEN END 

120 INPUT" CRLDCT NB 

200 C=NB DD 

210 R=NB\2+1 

230 IF LEFT$(AN$,1)="r" THEN 320 


240 GET WiR 
250 INPUT "name 
260 INPUT "address 
270 INPUT "telephone『 
280 INPUT "work 
220 IF C THEN LSET N13= IN も LSET A1$=A$:LSET 1$=T$: し SET 13=G を 

ELSE LSET NO$=N$:LSET AO0$=A$ も :LSET TO$S=T*:LSET QOS=OS 
300 PUT #1pR 
2 GOT0 160 
330 GET 
340 IF ce TE N$ も =N1$ も : A も =A1$: =T1$: 0S= ロ 1$ 

ELSE N$%=NO$:』 A$=, =A0$+ T$=TO も : 0$=00$ 

350 PRINT "name...・・・ 日 
360 PRINT "address・..、・. SA 
370 FRINT "telephone.。.・・、.・ 8 
380 PRINT “work。 < 
390 GOTO 160 


の 凡 ⑨⑫52 の ョ ロク ョ ララ が に な り ま す 、 この プロ グラ 
ム は , マニ ュ ア ル 97 ペー ジ の Fig 26 を , 1 
レコ ー ド 2 人 に , 変更 し た も の で す . 140 行 の 
FIELD 文 で 。 1 レコ ー ド の 区 分 け を し て いま す . 
0 の 付い て いる 文字 変数 は , 人 間 の 番号 が 偶数 
で ある 場合 , 1 の 付い て いる 文字 変数 は , 人 間 


"3NS も 
AS 
5T$ 
は 


の 番号 が 奇数 で ある 場合 に 使わ れ ま す .190 行 で 
人 間 の 番号 を 入力 し ます . 200 行 で 入力 され た 番 
号 が , 偶数 で ある か 奇数 で ある か 判定 する た め 
の 変数 C を 計算 し て いま す . 偶数 で あれ ば C の 
値 は 0 , 奇数 で あれ ば 1 が 代入 され ます . 210 行 
で 対応 する レコ ー ド 番号 R を 計算 し て いま す . 
ここ で , 注意 し な けれ ば な ら な い の は , 番号 の 
若い 順 か ら デ ィ ス ク に 書き 込ん で いく 場合 は よ 
い の で す が , ラン ダム に 書き 込ん で いく 場合 は , 
すでに 記憶 され て いる デー タ を 壊し て し まわ な 
いよ うに , 合成 する 必要 が あり ます . それ で , 
PUT# する 前 に GET# し て , 前 の 情報 と 混ぜ 
て いる わけ で す . 

この よう に , 単純 文字 変数 を 使う と , 
し つこ く 現 われ て よく な い の で , 文字 配列 を 使 
そば も っ と スマ ー ト に な り ま す . 


100 
8 / divided record demo こ 


139 opEN・ "test" AS 
140 FIELD #1, 20 AS FNe(0)。 45 AS AS(0), 18 AS TS(O), 4S た DS 


150 20 AS N$(1)」 45 AS AS(1)。 18 AS T%(1)・ 4S AS 9417 
160 PR1NT 
170 INPUT"read or write"iAN を 


180 1F ANS="end" ER END 
120 INFUT"number" 


IB\2. 
220 IF LEFTS(ANS。 1)="r" THEN 320 
っ 3 


240 GET W17R 
25O INFUT "name iN 
260 INPUT "address 1 

27O NR teterhene・ 4 

2S0 INPUT "wor 

220 Pa) NetCDENS usgr が 9(C)=66: LSET T$(C)=T$:LSET OS(C)=OS 


300 P 

310 Goro 160 
2 

330 GET # 


340 PRINT 中 清 
350 PRINT "address 


RA 
370 PRINT "work。。、- ーー・ 則 
380 GOTQO 120 


FIELD 文 の 働き が よく 理解 で き て いる 方 に は , 
次 の プロ グラ ム が 最も スマ ー ト か も し れ ま せん . 


は いり 有 4 
310 * 
13Q OPEN 『 "test" AS #1 
15O PR 


160 TNEUT read or writeViANs 
170 IF AN$="end" THEN END 
円 


divided record demo 3 


210 FIELD #1, C ォ 128 AS h$, 20 に N$, 45 AS AS, 18 AS T$。 45S AS US 
220 IF LEFT$(ANS,1)="FP THEN 


240 GET WiDR 
250 UT "name iT:LSET NS=1$ 
99 INPUT "address "iTSiLSET A$=1$ 
INFUT "telephone"i1$iLSET T$=1$ 
iTSiLSET 0$=1$ 


29 1 
3 6oro 159 


Tf 文 が 


ググ の 


20 GET yR 


350 PRINT "telephone・。 
360 PRINT “work 
370 GOTO 150 


この 例 で , 文字 変数 DS8 は ダミ ー で す , つま 
り 間 を 空け る た め に の み 使 っ て いる の で , 他 で 
使っ て な い 文字 変数 な ら な ん で も か まい ませ ん . 
この 例 に か ぎら ず , ラン ダム アク セス ファ イ 
ル を 使い た い の だ けれ ど , 1 つの 情報 単位 が 256 
バイ ト よ り も , あま り に 小さ すぎ て , ディ スク 
の 使用 効率 が よく な いと 悩ん で いる 方 は , 同様 
な 方 法 で 解決 で きま す . 例え ば , 情報 単位 が 64 
バイ ト な ら ば , 1 レコード を 4 分 割 す れ ば よい 
の で す . C と R の 算出 は 次 の よう に し ます . 


C=NB MOD 4 
R=NB ぎ 4 十 1 
3. 2. 6 レコ ー ド の 連結 


前 と は まっ た く 逆 の 場合 を 考え て み ま し ょ う . 
すなわち , ラン ダム アク セス ファ イル を 使い た 
い の だ けれ ど 情 報 単 位 が 256 バ イト より も 多い 場 
合 で す . 

最も 単純 な の は , すべ て の 情報 単位 が 256 バ イ 
ト よ り 大 きい の だ けれ ど , 同じ 大 きる さ で ある 場 
合 で す . 例え ば , すべ て 500 バ イト づつ 必要 で あぁ 
る 場合 に は , それ ぞ れ 2 レコ ー ド づつ 割り 振れ 
ば よい の で す . 第 1 プロ ッ ク は 1 番 レ コー ド と 
2 番 レ コー ド , 第 2 プ ブロック は 3 番 レ コー ド と 
4 番 レ コー ド ,。 と いう よう に 割 振る の で す . 

record 三 number* 2 一 1 


field#1, 100 asA$,100as BS$,56 asC1$ 
get 
field2。 44 asC2$, 100 as D$, 100 as 
ES 

get 

と ころ が , 1 人 当り に 必要 な レコ ー ド 数 が 人 


に よっ て 培う 場合 で す ,、 これ は , リス ト 構 造 に 


よっ て 解決 で きま す . 具体 的 に は , 一 次 元 配列 
を 用 意 し て その 中 に 次 の レコ ー ド 番号 を 入れ て 
お く , ある い は 連続 し て レコ ー ド を 占有 し て い 
る 場合 に は , 連 が る の か 連 が ら な い の か の 印 だ 
け で よい の で す . 


レコ ー ド の 連結 (配列 を 使う 方 法 ) 


リン クボ イン タ 


この ファ イル は 3 和 益 。 5 番 , 7 番 
9 符 レ コー ド を 使っ て いる 


この ファ イル は 


マー ク 。 法 


トー ンーー ペ ーー ーー フー ニー ヘー ーー スー ニー ノー ノラ 


それ ぞ れ 1 ブロック 


ディ スク 上 に , その ポイ ンタ を 作っ て お く こ 
と も 考え られ ます . 


レコ ー ド の 連結 (ディ スク 上 に 書く 方法) 
254 バ イト 


それ ぞ れ ディ スク 
上 の 1 レコ ー ド 


この ブロ ッ ク は , 3 レコ ー ド か ら 構 成 さ れ て いる 


同じ こと を , 印 を 使 
っ て 表わし た 場合 


3 つの レコ ー ド を 2 人 で 使う と か , ディ スク 
を せこ く 使 お うと する と きり が あり ませ ん 。 あ 
まり 複雑 に する と , ラン ダム アク セス ファ イル 


の メリ ッ ト が 薄れ て し まい ます . ほど ほど に し 
で くめ に 3E3 し 凍 加 2 


3. 3 ファ イル の 属性 - そ の 意味 と 用 法 
ファ イル に は 名 前 と 拡張 子 が ある こと を , 前 
に 説明 し まし た . 名 前 と 拡張 子 は ファ イル を 識 
別 す る だ け の も の で , Disk BASIC 自身 が その 
ファ イル に つい て 特別 な 配慮 は し ませ ん . ファ 
イル の 属性 は Disk BASIC に 。 その ファ イル 
が 特別 な が も の で ある こと を 示す た め に 用 いら れ 
ES で 
ファ イル の 属性 に は , 2 つの 種類 が あり ます . 


(1) 書き 込み 禁止 
(2) 書き 込み 確認 


どちら の 属性 も 重要 な ファ イル に 付け ます . 
書き 込み 禁止 属性 は , 完成 し た プロ グラ ム に 付 
け て , 不用 意 に プロ グラ ム が 壊 わ され る の を 防 
きま す . Disk BASIC は , ある ファ イル を 作成 
する と き , すでに 同一 名 の ファ イル が 存在 し て 
いる 場合 に は , その ファ イル を 自動 的 に 消去 し , 
同じ 名 前 の 新しい ファ イル を 作り ます . この 機 
能 は いち いち 前 の ファ イル を kill する 必要 が な 
く て 便利 で す が , うっ か り 同 じ 名 前 で プロ グラ 
ム を save し て , 大 切な 前 の プロ グラ ム を 壊 わ 
まう 7 還 な ど と いう こと に な りか ね ませ 
ん . その た め に この 属性 が ある の で す . 書き 込 
み 確 認 属性 は , プロ グラ ム に も 付け ます が , 特 
に デー タフ ァイル に 付け て 用 いま す . 正しく デ 
ー タ が 書け た か どう か , その 場 で 確認 する の で , 
後 で その デー タ が うま く 書 か て て いな か っ た 。, 
な ど と いう よう な 事故 を 防ぎ ます . 

これ ら の 属性 を ファ イル に 付け る に は , 具体 
的 に どの よう に すれ ば よい の で し ょ うか . それ 
に は SET コマ ンド を 使い ます . 


SET < ファ イル 名 >, < 属性 文字 > 


属性 文字 は , P また は R で , 次 の よう に 対応 し 
て いま す . 


上 の 2 つの 文字 以外 は , 属性 の 解除 に 用 いら れ 
ます . こ こ で 注意 し な けれ ば な ら な い の は ,P と 
R は 大 文字 で な けれ ば な ら な いこ と で す . 

た と えば , “format' プ ログ ラム は , も う 書 き 
変え る こと の な と 完成 し た プロ グラ ム で すか ら , 
書き 込み 禁止 属性 を 付け て み ま し ょ う . 


SEI 軸 torma 作 7 
この ファ イル を 強引 に 殺 そ うと し ます と 


kill format? 
File write protected 


と , エラ ー に な り , 殺せ な いこ と が わか り ま す . 
ここ で 注意 し た い の は , 書き 込み 禁止 属性 は , 
Disk BASIC に よっ て , ソフ ト 的 に 有効 に な っ 
て いま す の で , ドラ イブ を 直接 動作 させ る コマ 
ンド , た と えば , DSKO$8 な ど に は 無力 で ある 
skCodj 呈 還 5 の 35 う 6 記 信 属 の シス テム ディ ス 
ケッ ト に は , ハー ド 的 な 書き 込み 禁止 , す な わ 
ち , ライ ト プ ロ テク トノ ッ チ に シー ル を 張る こ 
と を お すす めし ます . ファ イル の 属性 を 解除 し 
Co2Ez 85382 

SET  、\format?\Q? 


も う 一 度 い ま の プロ グラ ム を 走ら せ て みれ ば , 
属性 が 解除 さき れ た こと が わか る で し ょ う . 
ドラ イブ に も 属性 を 与え る こと も で きま す . 


SET < ドラ イブ 番号 〉, < 属性 文字 > 


フロ ヨ 


以後 作ら れる ファ イル は , その 属性 を 持ち ます . 
この 「 以 後 作 られ る 」 と いう と ころ が 大 切 で , 
つま り , 前 に 作ら れ た ファ イル に , その 属性 が 
付く わけ で は あり ませ ん . ドラ イプ に 属性 が 付 
《 く ので あっ て ディ スク に 属性 が 付く わけ で は な 
い の で す . 以後 remove する まで その 属性 は 有 
効 で す . ディ スク の 属性 は , ID セク タ の 最初 の 
1 バイ ト の 値 で 設定 され , mount する と き に , 
その 値 が 読み 出さ きれ, その ディ スク の 入っ て い 
る ドラ イプ の 属性 が 指定 され る わけ で す . し た 
が っ て , DSKO$8 コマ ンド に よっ て , ID フィ ー 
ルド の 最初 の バイ ト に 10 (16 進 ) を 書き 込ん で 
お け ば , その ディ スク に 書き 込む こと は で き な 
HU2 ま 9 7C, と RG は 


FIELD#0, 1 AS AT$ 
D$=DSKIS (1, 18, 13) 
LSET AT$=CHRS$ (&H10) 
DSKO$S (1, 18, 13) 


と すれ ば , 第 1 ドラ イプ に 入っ て いる , ディ ス 
ケッ ト に は 書込み 禁止 が 付く わけ で す . 

この ディ スク に 書き た い 場 合 に は , SET 文 で , 
その ディ スク の 入っ て いる ドラ イブ の 書き 込み 
禁止 属性 を 解除 し て や れ ば よい の で す . し か し , 
ディ スク の 必 性 が 変わ る わけ で は あり ませ ん , 
再び mount し た と き に は , 書き 込み 禁止 属性 が 
指定 され る の で す . この よう に , 書き 込み に , 
ワン ステ ッ プ お く こ と に よっ て , 不用 意 に ファ 
イル を 破壊 する 事故 を 防ぐ こと が で きま す . プ 
ログ ラバ ディ スク と デー クタ デイ スク を 分 け i< で お 
いて , プロ グラ ム デ ィ ス ク に は , 書き 込み 禁止 
属性 を 付け て お く の も よい で し ょ う . 

その 他 に , ファ イル 番号 に 属性 を 付け る こと 
が で きま す . 


SET# < ファ イル 番号 〉。 < 属性 文字 > 


内 LSET・ 邊 人 


ィ ス クリ プ タ の 値 は 
変化 する 


の NaA 


LET と AG RSET の 違い 


AS の スト リン グ 
ディ スク リプ ブタ の 
値 は 突 化し な い . 


lelflgl | [elflgl 


(で の 6 細 Fm 


AS の スト リン グ 
ディ スク リプ タ の 
値 は 安 化 し な い . 


AS の スト リン グ デ 


3. 5 シー ケン シャ ルフ ァイル の ラン ダ 

ム ア ク セス 
シー ケン シャ ルフ ァイル 中 の 特定 の デー タ の 
み を 引き 出す に は , 頭 か ら 順 序 よ く 読ん で いっ 
て , 必要 な デー タ が 出 て 来る まで , 不要 な デー 
タ を 捨て な が ら , 待た な く て は な り また を 。 で 
の 方 法 は , ファ イル が 短 か け れ ば よい の で す が , 
長い ファ イル の 後 の 方 の デー タ を 引き 出す の は 
たいへん な 時 間 が か か り ま す . そこ を 何と か 改 
療 で き な い も の で し ょ うか . それ は , GET# 文 
を シー ケン シャ ルフ ァイル に 用 いる こと に よっ 
て 可能 に な る の で す . も ちろ ん , その デー タ の 
入っ て いる レコ ー ド 番号 が 解 か ら な く て は な り 
ませ ん . その 値 を 教え て くれ る の が , LOC 関数 
で す . LOC 関数 も ,、 ラ ンダ ム フ ァ イル の た め の 
関数 で す が , シー ケン シャ ルフ ァイル に 用 いる 
と , それ ま て 読み 書き し た セク タ の 総数 , す な 
わ ち , デー タ が 入る レコ ー ド 番号 より 1 小さ ぃ 
値 を 与え ます . この LOC 関数 を 使っ て 。 ラン 
ダグ ム フ ァ イル で 説明 し た よう な , 対応 表 を 作れ 


. ば よい の で す . 新しく シー ケン シャ ルフ ァイル 


己 選 


を 作る 場合 に は , 対応 表 を 作り な が ら フ ァイル 
を 作れ ば よい の で す が , すでに , ディ スク 上 に 
ある ファ イル か ら 対 応 表 を 作る に は , 一 度 読 き 
な けれ ば な り ま せん . 一 度 , 対応 表 を 作っ て し 
まえ くば, 後 は ラン ダム アク セス 並 に , アク セス 
で きる の で す . と いっ て も , GET# 文 で た し か 
に , 必要 な デー タ は , バッ ファ の 中 に 取り 込ま 
れ ま し た が , ラン ダム ファ イル の よ うに 固定 の 
フィ ー ル ド が 定まっ て な い の で , どこ か ら か 必 
要 な デー タ か 解 か り ま せん . で すか ら , 少し は , 
シー ケン シャ ル に 読ま な けれ ば な り ま せん が , 

256 バ イト の 中 で 見 つけ る の で すか ら , フ ァイル 
を 頭 か ら 読 ん で いく の と は , 大 ちがい で す . 1 
レコ ー ド の 中 に 復 数 の デー タブ ロッ ク が 入っ て 
いる と き に は , 番号 と か 名 前 と か 識別 子 を デー 
タプ ブロック 中 に , 入れ て お く 必 要 が あり ます . 
た と えば , シー ケン シャ ルフ ァイル を 作る と き 


の よう に 入れ て お け ば , 一 つ 読む た びに 比較 し 
て , 求め る 住所 を 引き 出せ ます . 

以上 の よう な 話 は , 発想 の 転換 で , シー ケン 
シャ ルフ ァイル の コマ ンド を ラン ダム ファ イル 
過 便 上 ポ 細 ラン グ パ ファ イル の コマ ンド を シー ケ 
ン シ ャ ルフ ァイル に 使っ て も よい で は な いか , 
と いう と と で す . この よう な こと は , ある 程度 
Disk BASIC を 理解 し て か ら で な いと , 思わ ぬ 
事故 を 起こ し ます . くれ ぐれ も 注意 し て 使い な 
が ら , も っ と 他 の 使用 法 も 考え て みて 〈 だ さい . 
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4.1 モジ ュー ル 化 プロ グラ ミン グ 


モジ ュー ル 化 プロ グラ ミン グ 

と は 

プロ グラ ム が 長く な っ て , どう し て も メモ リ 
に 収まら な いこ と が あぁ あります. こん な 時 の 対応 
策 と し て 考え られ る 方 法 に は 

*REM 文 を で きる だ け 省 略す る . 

* 配 列 は で きる だ け 少 く , また 倍 精度 より は 単 
精度 を , で きれ ば 整数 型 の 配列 に する . 
等 が あり ます が , ディ スク が 使え る 場合 に は , 
プロ グラ ム を モジ ュー ル 化 する テク ニッ ク が 使 
GE 

プロ グラ ム の モジ ュー ル 化 と は , 1 本 の プロ 
グラ ム を 分 割 し て 何 本 か の プロ グラ ム に し て 実 
行 する 方 法 で す . 


プロ グラ ム 全 体 


4. 応用 の 実際 


図 の よう に , プロ グラ ム 全 体 が メモ リ 内 に 収 ま 
ら な い 時 , 1 本 の プロ グラ ム を 2 本 以上 の 部 分 
(モジ ュー ル ) に 分 割 し て 。 モ ジュ ー ル 別に メ 
モリ 内 に ロー ド し て 実行 する わけ で す . 


上 の 例 で は , 1 本 の プロ グラ ム を 2 個 の モジ 
ュー ル に 分 割 し て いま す . この プロ グラ ム を 実 
行 す る 時 は , 最初 の モジ ュー ル を メモ リ に ロー 
ド し て 実行 し , モジ ュー ル 1 の 動作 が 終了 し た 
時 点 で ,。 ディ スク か ら モ ジュ ル 2 が ロー ド さ れ 
て 実行 が モジ ュー ル 2 に 移る わけ で す . 

例 で は プロ グラ ム を 2 個 に 分 割 し まし た が , 
も っ と 多数 に 分 割 で きま すか ら , プロ グラ フラ ム の 
長 さ の 制限 は ディ スク の 容量 の 制限 と いう こと 
に な り ま す . 

この 方 法 は , ディ スク の 容量 と 速度 な ら で わ 
の 方 法 と いえ る わけ で す . 


4. 1. 2 実現 する 方 法 
さて , 実際 に この 方 法 を どの よう に 実現 する 


弓 


か 考え で み ま し ょ う . 

まず 最初 の 問題 は |。 どの よう に し て モジ ュー 
ル 1 の 終了 か ら , モジ ュー ル 2 の 実行 に 入る か 
で す . モジ ュー ル 1 が END で 終了 する と BASIC 
は コマ ンド 待ち の 状態 に た に なり ま すか ら END 文 
は 使え そう も あり ませ ん . 

何 か 、 実行 を 他 の プロ グラ ム に 移す ステ ー ト 
メン ト が な いか , 2 章 を 開い て 探し て み ま し ょ 
う . ある で し ょ う . RUN で す . N-BASIC は 
コマ ンド も プロ グラ ム 中 に 書く こと が で きま す 
か ら , モジ ュー ル 1 の 最後 を 

RUN `* モ ジュ ー ル 2? 

で 終え れ ば ,、 モジ ュー ル 1 の 実行 後に 即座 に モ 

ジュ ー ル 2 が 動き だ す で し ょ う . この 調子 で , 
プロ グラ ム を 実行 し て いけ ば , エ ラー に な る か , 
END 文 を 実行 する まで コマ ンド 待 に は な ら な い 
は ず で す . 


4 に 
題 点 
プログラム を モジ ュー ル 別 に 書く こと が で き 
る こと は 分 り ま し た 。 が , 少々 問題 点 が ある よ 
2 です. も } 1 度 第 2 章 の RUN の 説明 を 読ん 
で 下さ い . プログラム や 変数 が クリ ア さ れる と 
説明 され て いま す , プロ グラ ム が クリ ア さ れる 
の つの は か まい ませ ん が , プロ グラ ム の 実行 の 途中 
で 全て の 変数 が クリ ア さ れ た の で は プロ グラ ム 
が 成立 し ませ ん . 何ら か の 手段 を 用 いて 変数 の 
引き 渡し を し な けれ ば な ら な いよ う で す . 
も う 1 つ , 問題 点 と は 言え な いま で も 不満 なみ 
点 が あり ます . 


3 モジ ュー ル 化 プロ グラ ム の 問 


RUN モジ ュー ル 2? 

を 実行 する と , モジ ュー ル 2 が ロー ド さ れ て 動 
き 出 し ます が , 動き 出す の は モジ ュー ル 2 の 最 
初 の 行か ら だ と いう こと で す . 

この 実行 の 手段 は 決 の 図 の よう な も の で す . 


RUN* モ ジュ ー ル 
モジ ュー ル 1 


を 


RUN* モ ジュ ー ル 2 


モジ ュー ルク 2 


と ころ が , 実際 の プロ グラ ムン グ で は 時 と し て 
モジ ュー ル 2 の 入口 を 2 O 以 上 作り た く な り ま 
す . 下図 の よう に で す . 


モジ ュー ル 1 


モジ ュー ルク 2 


残念 な が ら ,Disk BASIC で は この 方 法 を 話 
し て は くれ ませ ん . まし て , 下図 の よう に , 


選 選 


RUN* モ ジュ ー ル 1“* 


モジ ュー ル 1 


モジ ュー ルク 2 


モジ ュー ル 2 を , モジ ュー ル 1 の サブ ル チ ー 
ン の よう に 使用 する こと も 許し て は くれ な い の 
Ye で 応 


4. 1. 4 問題 点 を の りこ えて 

まず 変数 を モジ ュー ル 2 に 引き 渡す 方 法 で す . 
2 間 の RUN の 説明 を 読む と , RUN を 実行 す 
る と プロ グラ ム 領 域 と 変数 領 城 を クリ ア す る と 
書い て あり ます か ら , クリ ア さ れ な い 領域 す な 
わ ち プロ グラ ム 領 域 と 変数 領域 以外 の 場所 に 変 
数 の 値 を 保存 すれ ば よい わけ で す . 

そこ で 考え られ る 方 法 を あげ て み ま す . これ 
は 2 章 に も 書き まし た が , 


1) プ ログ ラム 領域 と 変数 領域 を 縮め て , 余っ た 
スペ ー ス を 使用 する . 


2) 変数 引き 渡し 用 の ファ イル を 作る . 


3) ファ イル 用 に 確保 さき れ る バッ ファ 領域 を 使用 
する . 
1) の 方 法 は 具体 的 に は PEEK と POKE を 使用 


する わけ で す が , 欠点 が あり ます . PEEK と POKE 
は 1 回 に 1 バイ ト の 値 ( 0 一 255 の 整数 ) し か 扱 
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えま せん . 従っ て 単 精度 実数 や 倍 精度 実数 、 さ 
ら に 文字 変数 を 保存 す る た め に は プロ グラ ム が 
複雑 化し て きま す . 


2) この 方 法 は 最も ノー マル の 方 法 と いえ る で し 
ょ う . 1 つの モジ ュー ル が 終了 する 際 に , 必要 
な 変数 の 値 を ファ イル に 保存 し て , 次 の モジ ュ 
ー ル で その ファ イル か ら 値 を も どす わけ で す . 
具体 的 に は ラン ダム ファ イル と , シー ケン シ 
ャ ー ル ファ イル を 使用 する こと に な り ま す . 特 
に , ラン ダム ファ イル の 場合 に は , ファ イル を 
閉じ る 必要 が あり ませ ん か ら , RUN “モジ ュー 
ル 2?。R の , R オ プシ ョ ン の つい た RUN が 
使用 で きま す . 


3) この 方 法 は , 2) の 方 法 を 簡略 化し た 方 法 で す . 
ラン ダム ファ イル を 使用 し て 値 を 引き 渡す 場合 
値 の 量 が 256 バ イト に 満た な い 時 に , デ ィ ス ク に 
書き 込む 動作 を 省略 し て , バッ ファ 領域 に 書き 
込む だ け で 値 を 渡す 方 法 で す . 2) の 方 法 の 場合 , 
ディ スク へ の 書 込 動 作 が 行わ れ ま す が , この 方 
法 で は ディ スク へ は 書込み 動作 は 行わ れ ま せん . 
従っ て 速度 は 向上 する は ず で す . 


変数 の 引き 渡し 方 法 が お よそ 理解 で きた ら 次 
は モジ ュー ル 間 の プロ グラ ム の 流れ に つい て 考 
えて み ま し ょ う . モジ ュー ル 2 の 入口 を 2 つ に 
する こと に せよ , モジ ュー ル 2 を サブ ルー チン 
と 扱う こと に せよ , Disk BASIC が 許し て いな 
いこ と を する わけ で すか ら , 若 二 見 に くい 構成 
に な り ま す . 

モジ ュー ル 2 の 入口 を 2 つ に する 方 法 は 、 モ 
ジュ ー ル 1 か ら モ ジュ ー ル 2 へ の 入口 を 示す 値 
を 引き 渡す こと で 解決 で きる で し ょ う . 

例え ば , モジ ュー ル 2 の 先頭 を 

ON A GOTO@, @, @, 
に し て お け ば , モジ ュー ル 1 か ら 変 数 A の 値 を 
渡す こと で 解決 で きる と 思い ます . 


RUN* モ ジュ ー ル 1? 


モジ ュー ル 1 


この 操作 は 上 図 の よう に 書け る で し ょ う ). 
同様 な 考え 方 で モジ ュー ル 2 を サブ ルー チ 
ン と し て 扱う こと も 可能 に な り ま す . 下図 を 見 
て 下さ い 、. 


ON A GOTO 


モジ ュー ル 1 


モジ ュー ル 2 


モジ ュー ル 2 を サブ プル チ ー ン と し て 呼ぶ こと 

に は 問題 が な い の で す が , モジ ュー ル 1 へ 戻る 
時 に 問題 に な り ま す . そこ で モジ ュー ル 2 へ 実 
行 を 移す 時 に A の 値 を も ジュ ー ル 2 へ 渡し , その 
値 を その まま モジ ュー ル 1 へ 戻る 時 に 返し て も 
ら っ て , モジ ュー ル 1 へ 入る 場所 を 知る わけ で 
9 


日 


モジ ョ ニッ 2 の 大 日 を 2 つ に する テク ニッ ク 
と ,。 モジ ュー ル 2 を サブ ルー チン に する テク ニ 
ッ ク を 組み 合わ せる と , か な り 複 雑 な プロ グラ 
ム の 構造 を 作れ ます が , ど ちら も 操作 が 複雑 で , 
バク (まち が い ) が 発生 し や すい は ず で すか ら 。 
で きる だ け 使 用 し な いよ うな プロ グラ ム を 書い ぃ 
た 方 が よい と 思い ます . 


4。1。 5 プロ グラ ム を 作る 

プロ グラ ム を モジ ュー ル 化 で きる こと が 分 っ 
た の で , 実際 に モジ ュー ル 別 に 分 け て ,。 プロ グ 
ラム を 作っ て み ま し ょ う . 

本 書 で は 、 モジ ュー ル 化 プロ グラ ム の 応用 例 
ら (し 0 ジョ プス ケ ジ ュ ー ラ と シェ ル ピ ン スキ 
ー 曲 線 を 描く プロ グラ ム を 作っ て み ま し た . 本 
来 な ら , プロ グラ ム を モジ ュー ル 化 する こと は ., 
あま り 良 い 結 果 を 招き ませ ん か ら , メモ リ に 収 
まる ブログ ラム を 進ん で モジ ュー ル 化 する こと 
は 避け る べき で す が , モジ ュー ル 化 プロ グラ ム 
の 応用 例 の アロ グラ ム が モジ ュー ル 化 きれ て ぃ 
な く て は 話 に な り ま せん . CNI ほ 7 ミグ ブック グ 
フ ム は , 読者 の 方 が し か た な く プ ログ ラム を 
モジ ュー ル 化 する 際 の 参考 例 と 考え て 下さ ぃ い 


4 1. 6 例 寺 ジョ ブ プ ・ ス ケ ジ ュ ー ラ 
一 般 的 に 言わ れる こと で す が , マイ コン を 婚 
め た 読者 の 最大 の 悲劇 は ,。 マイ コン に 夢中 に な 
っ て 勉強 し な く な る こと で す . この こと は 学生 
の みな ら ず 社会 人 に つい て も 言え る で し ょ う ). 
ゲー ム に 夢中 で 徹夜 し て し まう こと も あり が ち 
Ge0 請 
そ で そこで, この ジュ プス ケ ジ ュ ー ラ は , そん な 
あな た に 注意 を 促す 意味 で 作っ た プロ グラ ム で 
99 
この プロ グラ ム は 短 か い の で す が , お も し う 
い 機 能 を も っ て いま す . 最初 に PC に 何 の 仕事 
を する か 教え て お き , それ ら の 仕事 を 連続 し て 
行なわ せる わけ で す . で すか ら , 勉強 や 仕事 の 


合間 に ちょ っ と ゲー ム て 遊ぶ よう な 時 に , この 
スケ ジュ ー ラ で , どの ゲー ム を する か 指定 し て 
お け ば , 指定 の ゲー ム を 連続 し て 行い , 終了 す 
る まで コマ ンド レベ ル に は 戻ら な いわ け で す . 

コマ ンド レベ ル に 戻っ た 時 , で きれ ば 自動 的 
に PC の 電源 が 切れ る よう に し た か っ た の で す 
が , そこ まで プロ グラ ム で は 実行 で きま せん か 
ら , その 役目 は あな た の も の で す . 

Sa@ 主 記 の 2a ロ グラ を 。 どの よう に 実現 し 
だ た か 説明 し まし ょ う . 

基本 的 に は , 実行 する ジョ ブ 名 を 1 本 の シー 
ケン シャ ルフ ァイル 上 に 記録 し て お き , この シ 
ー ケ ン シ ャ ルフ ァイル か ら , ジョ ブ 名 を 読ん で 
実行 する こと に し まし た . 


JOB フ ァイル 


Ni 


JOB | の 実行 J0B 2 の 実行 J0B 3 の 実行 


こう る と , ジョ ブ 名 を 読ん で スタ ー ト させ 

る メイ ルル ー チ ン か 必要 で す . メイ ン ル ー チ ン 

で は , 次 の 動作 を し ます . 

※ ネ ジョ ブフ ァイル が 終り な ら , コマ ンド レベ ル 
に 戻る . 

* ネ ジョ ブ 名 を 読ん で ,。 その ファ イル が ディ スケ 
ッ ト 中 に 存在 する な ら , その ファ イル を 読ん 
で 実行 する . 

* ジ ョ ブ 名 で 指定 され た ファ イル が 存在 し な い 
な ら , その 冒 を 表示 し て , 次 の ジョ ブ 名 を 読 
む . 

次 に ,。 ジョ ブフ ァイル を 作る プリ メイ ン ル ー 

チン に つい て 説明 し まし ょ う . 
この ルー チン は 実行 する ファ イル 名 を シー ケ 

ン シ ャ ルフ ァイル に 積む だ な け で すか ら 簡 単 で す . 

た だ , 一 度 作 っ た ジョ ブフ ァイル を 何 度 で も 実 

行 で きる よう に , 壊さ な いこ と に し まし た . 


紀 


最後 に . ジョ プス ケ ジ ュ ー ラ の 下 で 実行 する 

ファ イル に つい て 説明 し ます . プロ グラ ム を ジ 

ョ ブス ケ ジ ュ ー ラ の 下 で 実行 きせ る の に は 2 つ 

の 条件 が あり ます . 

* ネ プロ グラ フ ム の 最後 は , END 文 で は な 〈, メ 
イン ルー チン を 起動 する 形 で な けれ ば な り ま 
せん . 

*※ プ ログ ラム の 実行 中 も , ジョ プ フ ァ イ ル は 開 
いた まま で すか ら , ジョ プ ブフ ァ イル の ファ イ 
ル 番 号 は , この プロ グラ ム 中 で は 使え ませ ん . 
この プ ブログ ラム は , 最後 を メイ ン ル ー チ ン を 

呼ぶ 形 に な り ま すか ら , END 文 で 終る プロ グラ 

ム と 区 別 する 意味 で , ファ イル ネー ム に 拡張 子 

を つけ , 他 と 区 別 す る こと が 望ま し いで し ょ う . 
実際 の 使い 方 を 説明 し ます . PRMAIN プロ 

グラ ム を 動か す と 最初 に , 


Create Job File (y プ n) ? 


と た ず ね て きま す . 存在 する ジョ プ フ ァ イ ル 
を 実行 する 時 に は n を , これ か ら ジ ョ ブフ ァ イ 
ル を 作る 時 に は y を 入力 し て 下さ い . 
次 に PC は 


Enter Job File Name ? 


と 聞い て きま す . ここ で ジョ ブフ ァイル 名 を 入 
力 し ます . この 後 , 最初 の 質問 に n で 答え た 場 
合 , この 時 入力 し た ジョ ブフ ァイル 内 の ジョ プ ブ 
を 実行 し は じ め ま す . 

最初 の 質問 に y で 答え た 場合 に は , この 後 


JOB#1 ニ 


と 出力 し て きま すか ら , 実行 する 順に プロ グラ 
ム フ ァ イル 名 を 入力 し て 下さ い . 1 個 入 力 す る 
毎 に 

JOBH2=……… 


JOB#3=……… 
と 義 い て きま す . 

最後 の JOB を 入力 し た 後 は , end と 入力 す 
れ ば , 最初 の JOB か ら 実 行 を 開始 し ます . 


100 ? 

110 / Job Schedular 

120 < PRMAIN Program 

00 で 0) 

140 INPUT "Creat Job File.(y/n) "3AbiA ま =LEFT ま (人 も) 1 ) 
15O / 


140 IF A$ ま =Wy! THEN GT OO 
ELSE IF A ま ="n! THEN GOTO 290 
ELSE GT 14Q 
1U7Ae) 9 
1EO ′ Make Joh Fi]e 
1 の 0 語 2 
2ZQ00 INFIUIT "Enter Joh File Name "jiJIEB$* 
FEN JE FR LUITFLIT AS #1 : NLIM=1 


FRTINT "Job # り 5NLIM5 

〆4C LINEINFUT "= リ "5A ま 

<50 IF A$="end" THEN ELnSE #1:GHTU 33O 

ELSE FRINT 芋 1 全員:NLM=NLIM+1:GTI SO 


2 ム 40 ? 

デ 70 / Jobh File are Already Exist 

0O 7 

<?0 INFUT "Enter Joh File Name'"iJnE$* 
に に 199 


0 ? 5oto Main :Exicnte Joh 
(@) 9 

O DFEN JE ま FIR INFIIT ム S #1 
40 RIN "ATIN.M ロ h"」R 


(979 の ) 7 

110 / Job Schedn]ar 

1 ダ 0 IATN Froaram 

UETg) の 

140 HIN ERRHR GT 230 

15O MIHTH 0Oj る 所 

1 を 0 < 

170 / Exic next Job 

LE10 有 語 2 

6] 1F EIF(1 ) THEN CLHSE#1 PRTNT "xxx JHB _ENLI *xx"iENLI 


ELSE INPUT #1,A$sRUN A ま 7R 
/ Fije not foind。 Print Message 
1F ERR=5S THEN PRINTjob xiAsimx is not found."iRESUME 1O 


ELSE IF ERR=642 THEN RESLIM 15Q 
ELSE ON ERR GnTn o 


に に) 四 


ジョ プ ブス ケ ジ ュ ー ラ 実行 例 


100 ? 

110 ′ Test Froaram #1 fanr Joh ご chedu1lar 

ut0) 2 

1 SO FRINT 

140 FRINT "*x* Hellow! 1 am Test 本 1。 xx 
15O FRINT 

1640 ? 

170 ′ Test 1 End 

18O ? 

150 RLHN "MAIN.M ロ HgRR 


由 


100 


110 / Test Frogram #2 for Joh 呈 に hedu]lar 


lc39)2 

13O FRINT 

14Q FRINT "*% 。 1] am Test #。 
15O FRINT 

140 ? 

170 / Test #2 En』 

1EO 7 

190 RLHIN "MAIN.M ロ LR 


Fun "FRMAIN.MIL" 
Ereat Joh File.(y/rn)? n 
Enter Job File Name? ASCTI 


\* テ Hellow! 1 am Test 持 1。 xx 


\ え 。 ] am Test 所 。 Hood Bye 
テテ THE ENL ※※ テ 
ロ ド 
4. 1. 7 例 #2 シェ ル ピ ン スキ ー 曲 線 
まず シェ ルビ ピ ンス キー 曲線 に つい て 説明 し ま 


MMS 2。 
N 決 の シェ ルビ ピン スキ ー 有 曲線 を 描く 手続 き は 


A (N) ヽ B (N) と C (N) ^D (N) クノ 


と 定義 きれ ます . ノ は 右上 り の 単位 長 の 直線 を 
描く こと を 示し て いま す . 又 , A (N) ~-D (N) 
は 次 の よう に 定義 きれ て いま す . 


1)N= ニ 0 の 時 何 も し な ぃ い 
2)N> 0 の 時 


Hood Eye  ※※" 


1 


A (N) :A (N-1) ヽ B (N- 1 ) ー っ D 
(N-1) ノ A (N-1) 

B (N) : B (N- 1) ン C (N-1) ! JA 
(N- 1 ) ヽ B (N- 1 ) 

C (N) :C (N-1) ヽ D (N- 1 ) ここ B 
(N- 1 ) ン C (N-1 ) 

D (N) : D (N- 1) ノ ZA (N-1) 1 1C 
(N- 1 ) ヽ D (N- 1 ) 


御覧 の 様 に A (N) の 定義 に A (N- 1 ) が 使 
用 され る と いう , 再帰 的 に 定義 され た 曲線 な わ 
9 

頭 の 中 だ け で 考え る と , 複雑 で わか ら な く な 
り ま す が , 試み に 0 次 の シェ ルビ ンス キー 曲線 
を 考え る と, 


A(0) 


D(0) 
B(0) 


C(0) 


と な る こと は 分 る で し ょ う 。 あと は プロ グラ 
ム を 走ら せ て みて 下さ い . 

さて , この 定義 を プロ グラ ミン グ す る 方 法 に 
つい て 考え て み ま し ょ う . まず 最初 に 頭 に 浮 ぶ 
の は , 4 (N), B (N),C (N),D (N) を サ 
ブル ー チ ン に し て し まう こと で す 。 更に 単位 長 
の 直線 を 引く 〈 部 分 も サブ ルー チン に すれ ば よい 
で し ょ う . A (N) -D (N) を サブ ルー チン に 
する と , この サブ ルー チン は 再帰 呼出 し する こ 
と に な り ま すか ら , ネス ト の 深 さ が 心配 に な り 
ます . ネス ト は N 次 の シェ ルビ ピ ンス キー 曲線 で 
N 十 1 回 に な る こと は 明白 な の で , 5 - 6 次 の シ 
ェ ル ビンス キー 曲線 まで な ら モ ジュ ー ル 化す る 
必要 は な いと 思い ます が , モジ ュー ル 化 プログ 
ラム の 実例 を 示す 意味 で , 今回 は 強引 に , 各 サ 
プ ブルー チン を モジ ュー ル 別 に 分 離し た プロ グラ 
ム を 作っ て み ま し た . 

プロ グラ ム は 決 の 6 つの モジ ュー ル か ら 構 成 
され て いま す . 


ネイ ニシ ャ ライ ズ プ ログラム 
※ ネ メイ ンプ ログ ラム 
*A (N) ブ ログ ラム 
*B (N) プ ログラム 
*C (N) プ ログ ラム 
*D (N) プロ グラ ム 


単位 長 の ライ ン を 引く プロ グラ ム は 独立 せ ず 
に 各 プ ログ ラム 中 に 含ま せま し た . 
この ブロ グラ ム 中 で 使用 する 変数 は ,。 ファ イル 
番号 の ラン ダム バッ ファ を 使用 し て いま す . 


その 変数 は 下 の 通り です. 


DEP : 現在 の スタ ッ ク の 深 さ を 示す . 

N  : 何 次 の シェ ルビ ピン スキ ー を 描い て い 
る か を 示す . (N 二 1 の 価 に な っ て 
いる ) 

HH : 単 位 長 の 直線 の 長き を 示す . 

X : 現在 の プロ ッ ト 位 置 (X 軸 ) 

Y : 現在 の アプ ロット 位置 (Y 軸 ) 


これ ら の 変数 は イニ シャ ライ スプ ログ ラム て で 初 
期 値 が セッ ト さ れる わけ で す . 

傘 に スタ ッ ク に つい て 説明 し ます . 

この プロ グラ ム は , イニ シャ ライ ズ を 除く 各 ル 
ー チ ン が 4 回 の サブルーチン コー ル を 行い , 互 
い に 呼 びあ う 形 に な る の で , サブ ルー チン か ら 
も どる 時 に は , どの モジ ュー ル の どこ へ も どる 
の か , 2 つの 情報 を スタ ッ ク に 積ま な けれ ば な 
り ま せん . その た め , スタ ッ ク も ラン ダム バッ 
ファ 上 に 作り まし た . 

スタ ッ ク の 構造 は 下 の よ うに な っ て いま す . 


ラン ダム バッ ファ 


スタ ッ ク 
安 数 用 領域 


例え ば , レベ ル 1 の モジ ュー ル に も どる た め 
に は , スタ ッ ク の レベ ル 1 の モジ ュー ル 名 の 場 
所 に 記録 きれ て いる モジ ュー ル を ロー ド し て ス 
ター ト し , その プロ グラ ム 中 で 場所 フラ グ (@ 
印 ) を 調べ て 戻る 場所 を 知る , と いう 手続 き が 
と られ る わけ で す . 

この プロ グラ ム を 実際 に 動か す 時 に は , 必ず 
イニ シャ ライ ズブ ログラム か ら ス ター ト し て 下 
さい . 他 か ら 動作 させ て も 正常 な 動作 は し ませ 
ん . 


に 性 


イニ シャ ライ ズ を スタ ー ト する と , で , 0 次 の 時 に 10 回 , 1 次 で 42 回 , 2 次 で 172 回 , 

3 次 で は 682 回 ディ スク を アク セス し ます . 遅い 

S (0。 Jl 諫 の 2 上 の は 当然 な の で す . 実は 4 次 の シェ ルビ ピン スキ 

ー ま で な ら ,PC の グラ フィ ッ ク で も 実現 は 可能 

と 聞い て きま す . これ は 何 決 の シェ ルビ ピン スキ と 思わ れる の で す が , 速度 の 面 を 考え て 断念 し 
ー を 描く か 聞い て いる わけ で す . 0 一 3 の 好き た わけ で す . 3 次 を 描か せる の に だ いた い 40 分 
な 数 を 押し て リタ ー ン し て 下さ い . ディ スク が 必要 だ っ た の で す . 4 決 で は 2728 回 ディ スク を 
カッ コン カッ コン 始め ます . 即座 に 描き 始め な アク セス し ます か ら , 4 ~ 5 倍 の 時 間 が 必要 で , 
いか ら と いっ て , あせ ら ず 見 守る と 描き だ し ま 現実 的 で は あり ませ ん . 先 に も 書い た よう に , 
3 本 守る 衣 52Js3 記 つう 則 ゆっ くり と で す . この プロ グラ ム は モジ ュー ル 化 し な く て も 動か 
の ag ルク ョ ジ 8 まお 細 モジ ュー ル の ロー ド だ け せま すか ら , 自分 で 作っ て 描か せ て みて 下さ い . 


シェ ルビ ピン スキ ー 曲 線 の イニ シャ ライ ズ 
プロ グラ ム 


OO 語 。 
191ICO 軸 2 
12O ′ This is Initrize Frogram of SIERFINSEY 
1EO ? 
140 MIHTH 07 宮 
LA 


Initrize Variah]le pace 
HFEN "STAEE リ Aa #1 
FIELLI 村 1)2 AS IEF あ )2 AE N ま 2 AE H 和 2 AS X ま 2 AE Y$ 
FIR 1=O TI ウ 
FIELT ##1 ヵ TX11+10 AS HLMMY ま (1))9 AS FRG ま (1T)72 AS FLG$*( 1 ) 
NEXT 1 


。 呈 erect N 


INFLT "EE(O7173253) "5TET=TNT(1) 
IF (IXO) ロ R (1T>3) THEN GaTn 240 
H= ラ 4\( る 1 ) 


′ Initrize Variah1le 


LSET HEF=MET ま (0 ) 
LEET H ま =MRT1 ま (日 ) 
LSET N ま =ME1$(T+1 ) 
LEET X ま =M ド 1(S ロ + 昌 ) 
LSET Y$=MET ま (0 ) 
LSET FLG ま (0)=MET ま (O) 


。 Tnitrize Hisplay 
FRTINT CEHR ま (13) 


ENEULE 0,25)0)0 
ELHR 001 


” GTH MAIN FR ロ GRAM 
460 < 
470 _ RLN "SIERF"jR 


に 


り 


′ This is Main Frosram of SIERPINSEKY 


ゞ 


FIELD #17 AS HEP ま )2 AG N$ も 2 AS 日 も)2 AG X 和 まう で AE Y 


FR 1=Q TI 
FIELLI #1,Tx11+10 AS HLIMMY ま (1T)」9 AE FRG ま (1) 2 AG FLG ま も ( 1] ) 
NEXT 1 


X1=CVI(X ま ):Y1= ニ に VI (Y$) :T= ニ CV1 ( HEF) : コ =EVT (Nb ) E 昌 = じ VI (日 ) 


7HIN FLE BRANCH 

7 FLG=O : first entFy 

の =1 : returrn from A(n) 
4 = * return from B(n) 
0 =3 : Feturn from に (n) 
0 =4 : returrn from Hi(n) 


HN CVI(FLG$(1) ) GTHSSO)S40 SB20) 420 
LSET FLG$( 1 )=MKI ま (1):EALL ま = リ "GTERFA" EGHTH 55O 7 Eosuh A(r) 
メニ X1+H: Y ジ =Y1+HIG ロ ELIE 5OQO 2 人 WE 


LSET FLG$ も (1 )=MKT$ も (2) iCEALL$= リ STERPE" G ロ TH 55O / Gosuh BCn) 
X2=X1- 昌 YS=Y1+H:GOEUB 00 / 1ine 


LSET FL も (1 )=IKT ま (3) CEALL ま = リ "TERFE" ET SSO / Rosub ビ (n) 


=ig0 X2=X1-H:Y2=Y1 HiGHSLIE 500- ” 1ine 
4 5 
410 選 SEWI FLG ま (1 )= ニ HKT$ ま (4 ) iCALL ま =" 王 TERFH" : ロ ロ T ロ =S30 / GosnuE HI(n) 
42o X2= ニ X1+ 昌 YS=Y1 - 昌 inSIB 500 ” 1ine 
4 / 
440 7A11]1 End 
45O < 
2 ELHSE #15RTLL "ETAEE"i LHCEATE 0 マコ)1: ENL 
(@) 
4EBG 7Lire (X1jY1)-(X2)Y) and X1:= ニ XS YY1i=Y ラ 
450 ・ 
に 1919) LINE (X1,Y1)-(X2,Y2) ,FSET,O 
510 LSET X$=MET$(X2) iLSET Y$=MKT ま (Y2 ) :RETLIRN 
ot0) の 
ご 0O 7RH T ロ SUBRI ロ ILITTNE 
540 ? 
550 SET HEF$=MKT*(]+1 ) iLGET FLG ま (]+1 ) =MKT ま (0 ) 
司る O LSEET FRG$ も ( 1 )=!EiTERP" 』RUN CALL$*,R 


メイ ンプ ログ ラム 
A (nm 8 (m) の @ (mn) Sp (n) ノ 
で 構成 され て いま す . 


24 


This 15 Subroutine A(n) of SIERPINSKY 


+ ユ 
ト 1 

( し o] 

ぐ で SQ NG 


15Q FIELL 1)2 AE IEP も う 2 AE N も と 2 AG H ま も)2 AS X ま 2 AS Y$ 


140 F ロ R 1=Q TH 
170 FIELHI 持 1,T*11+10 AE LUMMY ま ( エ ), ウ 9 AE FRG ま (T),2 AG FLG$(1) 


18O NEXT 1 
ミヌ 00 X1=CVT(X 和 まう) :Y1= じ UT (Y ま ) : エ = ビ VT (IEP ま ) : ゴー ビ V1T ( N$) :H=CVTI (日 $ ) 


SO 1Tf J=1 Then return 
40 IF =] THEN iT 480 


260 7 ロ N FLG BRANCH 
FLG=O :i first entry 
=1 : return from A(n-1 ) 
= ミタ g returri from B(n-1 ) 
si return from HL(n-1 ) 
return from A(n-1 ) 


ll 


お 


HIN CVT(FLG ま (T) ) GHTHSB4O)320) 420, 48O 
LSET FLG ま (1T)=MKT ま (1) ICALL ま ="STERFA" GHTH 570 / Gosuh A(n-1) 


X デ = ニ X1+Hi YS=Y1+HiGHSLB ニ る / ]ine 
LSET FLG ま (T)=MKT ま (2) iCEALL ま =" り IERFB" iT 5570 / osuh BCn-1) 
X デ ニ X1+ExHIY2=Y1iGHSLUB 520 / ]ine 
LSET FLG*(])=MKT ま (8) ICALL ま ="STERFLI" IiGHTI 570 / Gosuh H(n-1) 
9 X メ マニ X1+HI YS=Y1 一 HHSLIB / ]ine 

430 7 
440 LSET FLG$(1 )=MKT ま (4) iCEALL ま ="STERFA" GHTI 570 / Gosuh A(n-1 ) 
45O “< 
440 7A11 Endi Return 
470 ? 
48O LSET HEF ま =MET ま (エー1 ) iRLIN FRG ま (1 エ -1 ) )R 
420 ? 
OO 7Lirme (X15Y1)-(X2YS) and 。 X1i=X2 YY1i=Y2 
10 ? 
520 LINE (X1 ヵ Y1)-(X2,Y2)j」PSET 0 
530 LSET X ま =MKT ま (XS) iLSET Y ま =MRKT ま (Y2) :RETURN 
540 ? 
55O *G ロ T ロ SUBRUUTTINE 
560 ? 
570 LSET DEP ま も =MKI ま ( エ +1 ) iLSET FLG$( 1+1 ) =MKT$( O ) 
580 LSET PRG$( 1 )="SIERPA" iRUN CALL$ ヵ R 


A (n) モジ ュー ル 
A(nー|) ヽ B(nー1) 一 一 D(nー1) ノ 2A(nー|) 
で 構成 され て いま す . 


選 


100 ? 
AU5 の 
120 ′ This is Subroutine B(n) of SIERPINSKY 
FIELU #1,2 AS HEP も 2 AS N も 2 AS 昌和 ま )2 AE X ま 2 AS Y ま 
FUR 1=O Tn 2 
FIELHI 持 1 Tx11+10 AS LIMMY ま (T)」9 AG FRG* ま (1) ょ 2 AE FLG ま (1 ) 
NEXT + 


X1 ニ CV1( X$) : Y1= ニ VI (Y$ ) : =CVT (IEF$ ) : コ =CVT (N ま ) EzH=CVI (日 ) 


"ITf J=I Then return 
IF =1 THEN GnT 480 


IN FLG BRANCH 
FLG=O : first entry 
= ニ 1 : return from B(n-1 ) 
Feturn from (n-1 ) 
Feturn from A(n-1 ) 
return from B(n-1 ) 


TANST つ 
CO Co'CO 


IIQ_ SGNS_ GS SS 


HIN CV1I (FLG$( 1 ) ) GUTUS60) 390 420, 48O 


ょ 


LSET FLG ま (1 )= ニ MKT$(1) :CEALL ま ="STERFB" :G ロ Tn S70 / asuh BE(nー1 ) 
0 


X2 ニ X 1 日:Y2=Y1+HiGUSLIB ニ っ 1ire 
LSET FLG$( 1 )=MKI ま (2) iCALL ま ="STERPC" kT 379 / EosuE に (ロー1 ) 
メニ X 1 : Y ラ ニ Y1+ ラ * 昌 GSILIB に 0) / 1ine 
LSET 「L$(T )= ニ MKI ま (3) :CALL ま ="SETERFA" iT 70 7 osuh A(n-1 ) 
X2=X1+HiY2=Y1+ 昌 GUSLIE コ 20 / 1ine 
430 ? 
440 LSET FLG$( 1 )=NKT$(4) iCEALL ま ="STERPFE" :G ロ Tn S70 ?/ osuE HB(n-1 ) 
45O ? 
460 7A]11 Endi Return 
470 ・ 
480 ESEiT HEP*=HMKT* ま (1 エー1 ) :RLIN FRG ま (エー1 ) ) 民 
420 < 
500 “Line (X1,Y1)-(X27Y2) and X1i=X2 YY]1i= ニ YS 
510 ? 
520 LINE (X1,Y1)-(X2,Y2) PSET 0 
530 LSET X ま =MKT ま (X2) LET Y$=MKT も (Y2) : RETLIRN 
540 < 
550 7GH TO SUBROLTINE 
540 / 
57O LSET DEF* ま =MKT ま ( エ +1 ) :LSET FLG ま (1 エ +1 ) =MKT ま (O) 
580 LSET PRG$( 1 )=!GTERPB":RUN CALL も ま , 民 


B (n) モジ ュー ル 
B (nー!) ン C (nー1) 111A (nー1」) ヽ 


B (nー!) 
で 構成 され て いま す . 


己 品 


100 

110 

12QO 

130 

140 

150 FIELH #1,2 AS HEF ま )2 AE N あ 2 AS H ま )2 AG X も 2 AG Y$ 

140 FHR IT=Q TH ウ 

17Q FIELLI #1) TX11+10 AE HLUMMY$(1)」9 AE FRG ま (1),2 AG FLG$(1) 

180 NEXT 1 

1 の 2① 還 2 

に 019) X1= に VI ( X ま ) :Y1= に VI (Y$ ま ) : =CEV1 (DEF も ) : ゴ = ビ V1 (N ま も ) :H= じ V1 (日 ) 

う 10 『4 
EQO 7Tf = Ther returr 

ィ 


This is Subroutire C(n) of SGIERPINSKY 


CO で で 


IF ゴ J=1I THEN FiHTH 48Q 


つつ 〇 ご 


PIN FL ERANCH 
FLG=O : first entry 
=1 i return from に (ri-1 ) 
= * returri from HH(n-1 ) 


return from BE(n-1 ) 


=4 Feturn from に (mn-1 ) 


SG SS ざし で で に S 


HIN EUVI(FLG$(T) ) GRHT ロ BAO)B20) 420) 480 


mnnrnrmnrnhnhihiFY ト 1 ト 1 トト hi 
ヽ J 
の 


LSET FLG(T)=MKT ま (1 ) iCEALL ま ="TERPC" IGRHTO 570 / Gosuh C(n-1 ) 
X デ = ニ X1 Hi YS=Y1 HiGHSILE 520 。 1ine 


LSET FLG*(T)=MKI ま (S) ICALL ま ="ETERPH" IGHTI 570 / osub H(n-1 ) 
X デ ニーX1 HEY2=Y1 GSIE SS20 ′ 1ine 


LSET FLG ま (1 )=MRT ま (S) iiEALL ま ="SIERFB"*GHTH 570 / Gosuh B(n-1 ) 
X デ = ニ X1 一 Hi YS=Y1+HiGHSILE 30 1ine 
LSET FLG ま (T)=MRT ま (4) iCEALL ま = の ETERFC" siGHTH 570 / Gosuh E(n-1 ) 


7A11 Endi Return 


LEET LEF ま =MET ま (エー1 ) ERLIN FRG ま (エー1 ) )RR 


420 / 

SOO 2Line (X1 ヵ Y1)-(X2)YS) and 。 X1:=X2 Y1i=Y2 

5 出 ひ 員 4 

に 6) LINE (X1 ょ Y1)-(X2)YE))FSET,0 

530 LSET X ま =MK1T ま (XS) iLSET Y=MK1 ま (Y2) iRETLURN 
540 / 

55Q 7GH TU SHIBRHLITINE 

Se0 ^ 

570 LSET HEF*$=MRKT ま ( エ +1 ) iLSET FLG$( 1 ユ +1 )=MKT ま (0 ) 
に 19) LSET PRG$(T)= リ "TERFC" RUN CALL$R 


C (n) モジ ュー ル 

C (n ロ ー1!) ヽ  D (nー1|) ーーB (nー1) 
2 の @⑯ ((m 呈 () 

で 構成 され て いま す . 


紀 ジ 


。 This is Subroutirme hi(n) pf STIERPINSKY 


FTELLI #1,2 AS HEP$)2 AS N$)2 AG H$)2 AG X$ も 2 AS Y ま 


FQR 1=OQ TO 9 
FIELII #1,Tx11+10 AS HUMMY$(T))9 AE FRG ま (1),2 AG FLG$ ま (1 ) 


NEXT 1 
X1=CVI(X$) :Y1=CVI (Y$) :1= ニ CV1 (HEF ま ) :]=CVT (N$) :H= じ VI (日 ) 


7 


"If =1 Ther return 


IF 』J=1 THEN GT 480 
IN FLG BRANGH 
FLG=Q : first entry 
: returri from Hi(n-1 ) 
Feturri from A(n-1 ) 
Feturn from に (n-1 ) 
Feturn from Li(n-1 ) 


中 日 日 
や (ウト リッ ー 


IN CVI (FLG ま (1) ) GTn ロ SAO)3B90) 420) 4EO 


LSET FLG$(1 )=NMKT$(1)iEALL= リ STERFTI" ET 570 / osuh (mn-1) 


X==X1+H:Y ラ =Y1- 日 :GDSUH EzO ” 1ine 
LSET FL も ( 1 )=MRT ま (2) EEALL も ="ETERPA" HHTI 570 / osuh A(n-1) 
X=X1:Y2=Y1-2xHIGUEUB 52O ”。 1ine 
410 LSET FLG$(1)=MKI$(3) iEALL ま ="GTERFE" BHTI 70 / osub (ロー1) 
420 X ミ =X 1 日:Y ヌ =Y1- 昌 GSLE ニ 20 UiUmG 
4 の / 
440 LSET FLG$( 1 )=NKT*(4 ) iCALL ま =" リ TERFT iGHTH 570 / Hosuh LC(n-1) 
(0) 5 
440 7A11 Endi Return 
470 
450 LSET LEF ま =MKTI$( エー1 ) iRUIIN FRG*( エー1 ) )R 
4520 / 
300 2Lirme (X1,Y1)-(X2Y2) and XX1i=X2 YY1i=Ys 
550 9 
52O LINE (X1,Y1)-(X2,Y2) )PSET,0 
呈 30 LSET X$ も =MR1$(X2) iLSEET Y$=MET$(Y2) :RETLURN 
40 /? 
55O 7G ロ T ロ SLUERHIITINE 
540 
呈 ブ 0 LSET LEFP ま =MKT ま (1+1 ) iLSET FLG$( T+1 ) =ME LT も (0 ) 
に 1=16) LSET_FRG*( 1 )=!ETERFLI" RUN CALL$)R 


D (n) モジ ュー ル 

D (nー1) ノ A (nー1) 11C (nー|) ヽ 
D (nー!) 

で 構成 され て いま す , 


(注意 : この モジ ュー ル 化 プロ グラ ム は , 1 
枚 の ディス ケット 中 に 納め て 下さい . ディ 
スケ ッ ト は か な ら ず , ドラ イグ 1 に 入れ て 
トド さい .) 


紀 


、 
時 


に に 」 


4. 2 機械 語 ファ イル の 作り 方 


PC-8001 の モニ タ に は , W コ マン ド (ライ ト 
テー ブ プ ) と , 上 コマ ンド (ロー ド テ ー プ ) と いう 
2 つの 命令 が あっ て , メモ リ の 内 容 を その まま 
の 形 で テー プ (オー ディ オカ セッ ト ) に 保存 し 
て お く こ と が で きま す . し か し 残念 な が ら , デ 
ィ ス ク に 対し て は メモ リ の 内 容 を 直接 保存 し て 
お く コ マン ド が 用 意 さ きれ て いま せん . 
それ で も , N-BASIC に は , PEEK, POKE ュ コマ 
ンド が ある の で , 簡単 に その た め の プ ログ ラム 
を 作る こと が で きま す . それ で は まず , メモ リ 
の 内 容 を ディ スク に 書き 込む SAVE プロ グラ ム 
を 作っ て み ま し ょ 2. 


参考 の た め に W コマ ンド が 決 の よう な 形 を し 
iQ だ に IC に を 思い 出 還 ま 2 


*WXXXX、YYYY 
XXXX ニ スタ ー ト アド レス 
MYY0Y2 三 ンド の トレ タバ 


つま り , W コマ ンド を 使う と き に は , メ モリ の 
最初 の アド レス と 最後 の アド レス を 入力 し な け 


れ ば な ら な か っ た の で す . けれ ども , この W コ 
マン ド の 場合 に は 。 CSAVE コマ ンド の 時 と は 
違っ て 名 前 が 付け られ ませ ん で し た , 前 に も 書 
いた よう に プス ク EE で < デー ニク を 管理 する た 
め に は , 名 前 が 必要 で す 。 し た が っ て 必然 的 に 
機械 語 フ ァイル に も 名 前 を つけ られ る よう に し 
な いと いけ ませ ん . そし て , その 名 前 に は BASIC 
で 書か れん た プロ グラ ム と 区 別 す る た め に mem? 
と いう 拡張 子 を つけ で お く こ と に し ます .。 まず 
作る ファ イル の 名 前 を 開い て くる よう に し まし 
ょ う . 抜 張子 は 、。 ス トリ ング の 結合 を 使っ て 付 
け 加 えま す . 


INPUT FILE NAME? : NMS : 
NMS mem? 


次 に ディ スク に 書く メモ リ の 最初 の アド レス 
と 最後 の アド レス を 入力 する わけ で す が , モニ 
クタ で は 16 進 で 入力 し まし た . N-BASIC で は , 
16 進 数 を 表す 場合 , 前 に &h? を 付け て 入力 し 
な けれ ば な り ま せん . 

いち いち こん な も の を 付け て 入力 する の は 面 
倒 を の で , まず 文字 型 変数 で 入力 し て , その 前 
に “&h” を プロ グラ ム で 付け 加える よう に し ま 
KC3022(E6 3 の 5 うに | し 3 た 


INPUT “START ADDRESS? : SAs 
SA ニ VAL (Y&h/ 十 SAS) 
IF SA<O THEN SA=SA+65536 ! 


この ブログ ラム で は , まず スタ ー ト アド レス 
を 文字 変数 SA$ に 読み 込み ヾ &h? を 前 に 付け 
て , VAL 関数 を 使っ て 数 値 に 変換 し て いま す が , 
POKE コ マン ド と , PEEK 関数 の 引数 が 負数 を 
受け 付け ませ ん の で , 65536 を 加え て 正 数 に し て 
OoEs で つの )8 行 の 命令 並び は 16 進 数 を 入力 す 
る と き の 基 本 的 を パタ ー ン で す . も ちろ ん , 最 
後 の 行 を な を ど は , IF 文 以外 の ビッ ト 操 作 (論理 式 


を 使う ) に よっ て 書き 変え る こと も で きま す . 
8 選 (g 


SA ニニ SA _ AND &HEFFFF 


で も よい わけ で す . 
さて いよ いよ ディ スク に 書く わけ で す が , ま 
ず OPEN で , 書き 込み ファ イル を 用 意 し ます . 


OPEN NM$ FOR OUTPUT AS 町 


これ で , NM$ と いう 名 前 の 出力 ファ イル #1 が 用 
意 で きま し た .、 まず スタ ー ト アド レス と エン ド 
アド レス を 書き 込み ます . 


PRINT#1,。 SA EA 


次 に , メ モリ の 内 容 を PEEK 関数 で 読み 出し 
て , 書き 込み ます . 


FOR AD=SA TO EA 
PRINT#1, PEEK (AD) 
NEXT AD 


ここ で , AD は この FOR-NEX 華 ルー の 制御 変 
数 で す . 

ファ イル へ の 書き 込み が 終っ た ら , それ を Disk 
BASIC に 知ら せる た め に , ファ イル を クロ ー 
ズ し ます . 


CLOSE#1 


これ で , 1 の ファ イル の 使用 を 終っ た わけ で す . 
END 文 に よっ て も , フ ァイル は クロ ー ズ され ま 
す が , 今 の 場合 の よう に , ファ イル を 1 回 だ け 
使用 する 場合 に は 混乱 は 起こ り ま せん が , 何 度 
も 同じ ファ イル を 使っ て 効率 よく ファ イル 領域 
を 使用 する 場合 に は , た い へ ん な こと に な り ま 


1 ロ 


す . OPEN し た ファ イル は , 用 が 済ん だ ら , か 
なら ず CLOSE する よう に し まし ょ う . 


以上 を まとめ て み ま す と 次 の よう な プロ グラ - 


ム に な り ま す . 


100 ? 
110 / save memory image 
4 の) と 
130 INFLT"file rame'iNNM$ 
140 NNM=NNM$+" 。mem 
150 INFLT"start agdress"jA 
160 ご A=VAL ("Sh リオ 己 A$ ま ) 
170 ご A=SA_ANLI %HFFFF 
180 INFLIT "end address "jiEA$ 
120 EA=VAL ( "リキ EA$ ) 
<00 EA=EA ANLI %&HFFFF 
テ 


220 ロ PEN NM ま FR HLITFLIT A5#1 
230 PRTNT#1,A7EA 
240 FIR AL=GA Tu EA 
250 FRINT#1,PEEK(Ah) 
240 NEXT An 
ラフ 70 CLPIEE #1 
280 END 

実際 に この プロ グラ ム を 使っ て み ま し ょ う . 
まず , MON コマ ンド で , モニ タ に 制御 を 移し 
ます 。 こ こ で は , 機械 語 プ ログ ラム で は な く て , 
00 か ら 0F(16 進 ) まで の 数 を アド レス C000 (16 
進 ) か ら C 00 F (16 進 ) まで の メモ リ に 書き 込ん 


で み ま す . 


FOOO FFOO FFO1 FF-GS FF-OS 
94 FFー04 FF-Q 呈 FF-O4 FF-0 フ 7 
9 FFーQOE FFー0 ウ FF-OA_FF-OBH 
FOO に FFOE FF-OLI FF-OE FF-OF 
CO10 FF- 
レコ 


6 
1 


ロト 


注意 する こと は , N-BASIC が この 領域 を 使用 
し て いな いこ と で す . まだ , 何 も 行なっ て いな 
いな ら , CLEAR 文 で N-BASIC の 使用 限度 を 
指定 する 必要 が あり ます . た と ぇ ば , C000 番 地 
か ら ユ ー ザ ー が 使用 し た い の で あれ ば , 


CLEAR 100, &h BFFF 


を 実行 すれ ば よい の で す . た だ し , 第 一 引数 の 
100 は 文字 領域 の 大 き さ を 示し ます . 

これ を , 怠る と N-BASIC に よっ て せっ か く の 
ッッ ー ジ 4 の 242 さ 40 ま 59 請 次 に この プログラム を 
走ら せま す . 


1 ロ 1 


Fi 
file name? test 
start address? =O0O 
end address? cOO0f 
ロ ド 
これ で , アド レス C000 (16 進 ) か ら CO0F (16 
進 ) ま で の メモ リ の 内 容 が 入っ た , “TEST. memy 
と いう ファ イル が で きた こと に な り ま す ., 

それ で は 次 に 機械 語 用 の ロー ド プ ログ ラム を 
作っ て み ま し ょ う . どの 番地 か ら ロ ー ド する か 
は , ファ イル に 記録 され て いる の で , ファ イル 


名 だ け を 入力 すれ ば いい の で す . 


INPUT “EILE NAME” : NMS 
NM$=NMS 二 “mem? 


ファ イル を 読み 込む 場合 に も , 書き 込み の 場合 
と 同じ よう に まず ,- ファ イル を オー プン する 必 
要 が あり ます . 


OPEN NMS FOR INPUT AS 反 


これ で , NMS と いう 名 前 の 入力 ファ イル 時 が 用 
意 で きま し た , まず スタ ー ト アド レス と エン ド 
アド レス を 読み 込み ます . 


INPUT#1, SA, EA 


どの 番地 に 書き 込む つも りな の か 表示 させ ま 
し ょ う . この と き 16 進 形式 で 出力 する 方 が 見 や 
すい ぃ の で , HEX$ と RIGHTS 関数 を 使っ て 16 
進 に 変換 し ます . 


SA$=RIGHT$ (`000'+HEX$ (SA), 4 ) 


この 文 に よっ て , 数 値 変数 SA( ス ター ト ア ドレ 
ス が 入っ て いる ) は , 16 進 形式 の 文字 型 変数 SA$ 
に 変換 され ます . ス ター ト ア ドレ ス と エン ドア ド 
レス を 表示 し た の ち , 実際 に メモ リ に 書き 込み 


ます . 


FOR AD=SA TO EA 
INPUT#1, D : POKE AD,D 
NEXT AD 


変数 AD は , FOR-NEXT ルー プ の 制御 変数 で , 
今 書き 込む アド レス を 指し て いま す . 変数 D は , 
INPUT 文 が 関数 で な く 〈 く て, ステ ー ト メン ト で 
ある た め に 使用 し た , 一 時 使用 の 変数 で す . フ 
ァイル の 読み 込み が 終っ た ら ク ロー ズ し て お き 
まま 9 訂 


CLOSE#1 
これ で 今 使用 し た , 入力 ファ イル 抽 の 使用 が 終 


り ) ES 
以上 を まとめ て み ま す と 次 の よう に な り ま す . 


100 “ 

110 ′ ]oad memory image 

120 語 4 

130 INFIHT"file name"iNM も 

140 NI4$=NI4$+" 。mem リ 

150 _ ロ FEN_ NM も FOR INFUT AS #1 

160 INFUT#1 SA,EA 

170 SA$=RIGHT ま ("000"+ す HEX$ も (SA) 4 ) 
180 EA$=RTGHT ま ("000"+HEX$(EA ) ) 4 ) 
120 FRINT "start address"」 ご Ab 
200 FRINT "end address")EA$ 
210 ?“ 

220 FIR AI=SA TU EA 

230 INPUT#1,DiFPHKE AH,H 

240 NEXT AD 

250 CLOSE #1 

240 ENH 


実際 に この プロ グラ ム を 使う 前 に , あら か じ 
め メ モリ の 内 容 を 壊し て お け ば , ロー ドル ー チ 
ン の 働き が , わ かり ます . た と えば , OFF(16 進 ) 
を 書き 込ん で お きま し ょ う . 


ロト 

所 Ori 

こじ OOO 

COO0O 00-FF 01FF 0 ダーFF 03ーFF 
CO04 04-FF 0O5-FF の 46-FF 07-FF 
FOO0E 0E-FF 0 ターFF 0A-FF OBE-FF 
CO0C 0 ヒーFF OH-FF OE-FF QF-FF 
CO10 FF-FF FF-FF FF-FF FF-FF 
014 FF-FF FF-FF FF-FF FF-FF 
CO18 FF- 

3 


ロー ドブ プロ グラ ム を 走ら せま す . 


Fun 
file name? test 
start address COOO 
end address COOF 
ロ ド 


うま く メ モリ に 書き 込ま れ て いる か , モニ タコ 
マン ド を 使っ て た めし て み ま す . 


ロ ド 


TO 

XSGEO0Q 

COQOO_QQ- 01- 02ー 0)3ー 
EQ0O4 Q4- 05ー 0 ムー Q7ー 
COOE 0O 旨 ー Q ウ ー 0Aー 0①EHー 
EQOOE Q ビ -  QH-  QOE- 0 ビー 


EQO10 FF- 反 選 三 FF- FFー 
じ O14 FF- FF- FFー 所 F 三 
FO1 選 FF- 

テ 

ロ ド 


正確 に ロー ド さ れ た こと が わか り ま す . 

きこ ご で どの よう に デー タ が ファ イル に 入っ て 
いる か を 知る た め に , 前 に 作っ た ファ イル ダン 
ププ ログ ラム (ここ で は fdump と いう 名 前 を 付 
け て ある ) で 見 て み ま し ょ う . 


Fun "fdump" 

file namer test.mem 
0000 2 81 34 ES 3 
QQ00B 2O 
0010 表 ん 
0018 30 20 
0020 0A SG 
002B 20 
0030 20 3 
0038 OH GO 
0040 3 2 
0048 0A 2 
0050 81 3 
0058 SO CO 
0060 0A 2 
0068 31 
ロト 


お や , だ た っ た 16 バ イト の デー タ を セー プ ブ し た だ 
け な の に ずい ぶん 量 が あり ます ね . ここ で 前 に 
説明 し た ,「 フ ァイル へ の 書き 込み は 文字 列 と し 
て 出力 され る 」 こ と を 思い 出し て くだ さい . つ 
まり 数 値 を ファ イル に 書き 込む と , それ を PRINT 
文 で 。 プ リン ト し た の と 同じ だ け の 文字 数 が 必 
要 に な る の で す . 今 の 場合 . アド レス は 2 バイ 
ト , デー タ は それ ぞ れ 1 バイ ト あ れ ば , 表現 で 
きる の で すか ら , これ は た だ たいへん な ムダ を し て 
いる こと に な り ま す . それ で ,Disk BASIC で 


は , 数 値 の 内 部 表現 を その まま , 読み 書き する 
た め の 関 粗 が 役に立ち ます . アド レス を 示し て 
いる 整数 変数 は MKI$ に よっ て 2 バイ ト の 文字 
列 に 変換 で きま すし , その 逆 は , CVTI 関数 に よ 
っ て 行い ます . メモ リ の 内 容 も この 2 つの 関数 
を 使っ て 2 バイ ト の 情報 と し て 読み 書き で きま 
す が , 1 バイト の デー タ を 2 バイ ト に し て 記録 
する の は ムダ で す . 1 バイ ト の 数 値 文字 変換 関 
数 は 用 意 き れ て いま せん が , この 変換 は CHRS$ 
と ASC 関数 に よっ て 行 な を る の で す . 

すなわち , CHRS$ が 1 バイ ト の 数 値 を 1 文字 に 
変換 する 関 鍵 で ぁ あり , ASC が 1 文字 を 1 バイ ト 
の 数 値 に 変換 する 関数 な の で す . これ で 必要 最 


少 の 容量 で 。 デー タ を 記録 する こと が で きる の 
で す . 

100 2 

110 / save memory image 


AZ40) の 

130 INPLIT"file name'5NNM ま 

140 NM も =NNM ま +" 。mem" 

150 INFLIT"start address"j ご A ま 
160 ご A=VAL ("&h"+ ご A ま ) 

170 己 A ま =MKT ま (ご A ) 

180 A= ニ GA ANH SHFFFF 

120 INPLIT "end address"jEA$ 
200_ EA=VAL ("Sh "ナビ A ま ) 

210 EA ま =NET ま (EA ) 

220 EA=EA ANLI %HFFFF 


240 ロ FEN NM$ FR ILITFIUIT AS#1 
250 PRTNT 后 1 ご A ま ビ A も 5 

260 FIR ALI= ニ SA TH EA 

ン 70 FRTINT 失 1 に CHR ま (FEEK ド (AH) ) 
230 NEXT AL 

2 ンタ 0 PRINT #1 

00 CLOSEE 持 1 

ご 10 END 


11D / ]oad memory 1mage 

12O 7? 

13SQ INFLUIT"file riame'jNNM$ ま 

140 NNM$=NN ま +" .miem" 

1SQO_ ロ EEN NM も FIR INFILIT AS #1 

160 ご A= ビ V1( INFILIT も ( 且 ) 1 ) ) 

170 EA= ビ VI (INFLIT ま ( 全 )1 ) ) 

180 ご A$ も =RTGHT ま (0OQ00 リ +HEX ま (SA ) 4 ) 
120 EA も =RTGHT も ("000 リ +HEX$(EA ) ) 4 ) 
200_ PRINT "start address"j ご A$ 
210 FRINT "end address")EA$ ま 


230 FR ALI ニ A TH EA 

240 PQRKE AD,ASE(TNFLUT ま (1)1 ) ) 
2SO_ NEXT AL 

260 E じ LSE 持 1 

270 END 


前 と 同じ よう に し て , メモ リ の 内 容 を セー プ し 
て , 再び 入力 し て み ま す . 


Fri 
file name? ts 
start address? =OOO 
nd address?2 cOOf 
ロ k 


これ ら の プロ グラ ム は , ファ イル の 中 に どの よ 
うに デー タ が 入っ て いる か , "fdump? プロ グラ 
ム を 使っ て 見 て み ま し ょ う . 


run"fdump" 

file name? test.mem 

O000 Q0 CO OF CO QO 01 02 03  .9. グ ..。 
OO08 04 05 0 Q7 QB 05 QA OB 
QQO10 0C OH QE QF On 9A 

ロ ド 


どう で す , ぴ びっしり デ ー タ が つま っ て いる で し 
ょ う . この と き に 注意 し て ほし い の は , 


PRINT#1,。 SAS :EAS : 
や 
PRINT#1, CHR$ (PEEK (AD)) , 


な どの 中 に ある ~:? で す . これ が な いと 間 に 
空白 が 入っ て し まっ て 思う よう に デー タ が , 記 
録 さ れ ま せん 。 と ころ が , この よう に デー タ を 
ビッ シリ 詰め て し まう と , 前 の よう に INPUT 
文 で は デー タ を うま くく 読み込め ませ ん . それ は , 
デー タ と デー タ の 切れ 目 が 分 か ら な く な っ て し 
まう か ら で , Disk BASIC は デー タ を どん どん 
読み 込ん で , すべ て の デー タ が , 文字 変数 SA$ 
に 入っ て し まう か , ある い は , 255 文 字 を 越え る 
場合 に は エラ ー に な っ て し まい ます . 前 の プロ グ 
ラム で は デー タ と デー タ の 切れ 目 に キャ リッ ジ 
リタ ー ン と ライ ン フ ィ ー ド の コー ド (0D と 0A) 
が 入っ て , デー タ の 切れ 目 が 分 か っ た の で す . 
そこ で , INPUTS$ 関数 を 使っ て 必要 な 文字 数 だ 
け 読み 込む せよ うに し た わけ で す . 

この プロ グラ ム で の 教訓 は ,「 数 値 を ファ イル 
に 書き 込む と き に は 内 部 表現 を 使え .」 と いう こ 
と で す . 数 値 を 内 部 表現 に 対応 する 文字 列 に 変 
換 す る 関数 は , ラ ンダ ム ア ク セス ファ イル で は ., 
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必ず 必要 な も の で す が , シー ケン シャ ルフ ァ イ 
ル で も , 使わ な けれ ば ディ スク の だ 使い を し 
て いる こと に な る の で す . 

Disk BASIC で は , シー ケン シャ ルフ ァイル 
の 終り リ を EOF コー ド (1A (16 進 )) で 判断 し て 
いま す . し た が っ て デー タ の 最後 の デー タ が EOF 
コー ド で ある 場合 に は , その デー タ が 読ま れ な 
《⑯ eo の で し E3WAE3SL ぐら ぐら の ググ ジ が 
で は 最後 に 余分 の CR ノ LEF コー ド を 送っ て いま 
す . 


4 . 音声 発生 


最近 は 少々 下 火 に な り ま し た が , 一 時 は マイ 
コン で 音声 を 発生 きせ る こと が 流行 し まし た . 
米国 の A と いう パー ソナ ルコ ンピュータ の 場合 
に 至っ て は , 何と ハー ドウ ェ ア を 追加 し な 〈 て 
も 引 ソ クト ウェ アア だけ で 声 を 出れ まず す . 
他 の パー ソナ ルコ ンピュータ で で きる 事 な ら 
ば , PC-8001 で も 不可 能 な は ず は な いと 考え られ 
ます . そこ で , PC-8001 を 使っ て 音声 を 発生 で き 
る か どう か 実験 し て み ま し た . 


4. 3. 1 原理 
音声 を 扱う 代 書 的 な 家電 製品 と し て , テー プ 
レコ ー ダ ター が あり ます . これ は 音声 の 波形 を マ 
イク を 使っ て 電気 的 な 波形 に 変換 し , 更に 電気 
的 を 波形 を 磁性 体 に 記録 する 働き ほ と , その 逆 の 

働き を も っ て いま す . 


コン ピュ ー タ で 音声 を 発生 させ る 方 法 も , 基 
本 的 に は テー プレ コー ダ と 全く 同じ で す . 電気 
的 に 変換 され た 音声 の 波形 を コン ピュ ー タ が 記 
憶 す る わけ で す . 

し か し , テー プレ コー ダ の 場合 は , 入力 の 音 
声 波 形 を アナ ログ 量 の まま テー ブ プ の 磁性 体 上 に 
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記録 し ます が , マイ コン の 場合 (デジ タル 機器 
は すべ て で す が ) アナ ログ 量 を 直接 取り 扱う こ 
と が で きま せん . そこ で アナ ログ 量 を デジ タル 
量 に 変換 する 回 路 が 必要 に な り ま す . 

デジ タル 化 も いろ いろ な 種類 が あり に 
1 を 見 て 下さ い . 


1 ピッ ト の 量子 化 
4 レベ ル ! 
ラ うど 
の 2 基準 レベ ル 
レベ ル 0 
量 
2 ア レベ ル 1| 
イ 
ウ 
ル 
量 レベ ル 0 
図 ! a 
2 ピッ ト の 量子 化 
レベ ル 3 
アナ ログ 量 ー レベ ル 2 
レベ ル 1 
レベ ル 0 
ディ ジタル 量 レベ ル 3 
レベ ル 2 
レベ ル 1 
レベ ル 0 


アナ ログ 量 を , 1 ビッ ト の デジ タル 量 に 変換 
する 場合 , 図 1 の よう に 基準 レベ ル を 定め て 
お き , アナ ログ 量 が 基準 レベ ル 以 上 の と き デ ジ 
タル 量 の 1 に , 基準 レベ ル 以 下 の 時 に は デジ タ 
ル 量 の 0 に 対応 させ れ ば よい わけ で す . 

2 ビッ ト の デジ タル 化 の 場合 に は , デジ タル 
で も 4 段階 の レベ ル を 表せ ます か ら , アナ ログ 
量 を 分 ける 時 , 基準 レベ ル を 3 本 に し て , 4 通 
り の レベ ル に 分 割 で きま す . 

同様 に 3 ビッ ト の デジ タル 化 で は 8 レベ ル に 
分 割 で き , 4 ビッ ト の デジ タル 化 で は 16 レ ベル 
に た 分割 で きま す . 当然 の こと で す が , ビッ ト 数 
が 多く な れ ば な る ほど , アナ ログ 波 に 近い 形 で 
再現 で きる わけ で す . 

デジ タル 化 さ れ た 音声 波形 は マイ コン に 記録 
され る わけ で す が , その 際 , マイ コン が 波形 を 
記録 する 間隔 が 問題 に な り ま す . 

1 ビッ ト で デジ タル 化す る 場合 で 説明 し まし 
8 の 。 

図 2 を 見 て 下さ い . 


図 2 ! ビ ピッ ト で ディ ジタル 化 さ れ た 音声 波形 を コン ピュ ー タ が 記録 する 例 


一 音声 波形 


靖 昌 uuee 


コン ビュ ー タ が 
記録 する 波形 


ニタ / が 
Ii 


中 用 用 上 | 


記録 する 波形 


デジ タル 化 さ れ た 音声 波形 は 一 定 周期 で コン 
ピュ ー タ が 読む わけ で す が , コン ピュ ー タ が 読 
む 間 隔 (サン プリ ング 周期 ) に よっ て , 実際 に 
コン ピュ ー タ に 記録 され る 波形 と 。 デジ タル 化 
され な 音声 波形 と に 違い が 生じ て くる わけ で す . 
図 .2 で は , a が b の 半分 の 周期 で 音声 波形 を 


サン プリ ング し て いま す . 記録 され る 波形 は a 
より も b の ほう が 明らか に 音声 波形 に 近い こと 
が 分 る と 思い ます . 

ここ まで の 説明 で て コンピ ュー タ で 音声 波形 を 
扱う 時 できるだけ 実際 の 音声 波形 に 近づけ る 
方 法 は 次 の 通り に な る こと が 分 っ て も ら え た と 
思い ます . 


1) デ ジタル 化 の 際 の ビッ ト 数 を 多く する 。. 
2) サ ンプ リン グ 周 波数 を 高く する . 


上 の 2 つの 条件 を 満た せ ば 音声 を 再生 する 時 の 
音質 は 向上 する わけ で す が , 逆 に 条件 を 満た せ 
ば , コン ピュ ー タ が 記録 する 情報 量 が 増加 する 
こと に な り ま す . コン ピュ ー タ の メモ リ に は 限 
度 が あり ます か ら , 音質 を 適当 な 所 で 切り 拾 て 
て , 記録 する 時 間 を 得る こと に な り ま す . 
例えば 。 1 ビッ ト の ジル (で, サン グリ 9 
ング 周波 数 8 kHz で , 12 秒 記録 で きた と する と , 
2 ビッ ト の デジ タル 化 で , サン プリ ング 周波 数 
16kHz の 場合 。 3 秒 し か 記録 で きま せん . 

サン プリ ング 周波 数 を 下げ て 時 間 を 稼ぐ と い 
っ て も , 音声 を 再生 する の に 最低 限 必要 な 周波 
数 と いう も の が あり まし て , あま り 下 げ る こと 
は で きま せん . 

これ は 情報 理論 の 標本 化 定理 に より , 周波 数 
F の 信号 を サン プリ ング し て 再生 する た め に は , 
サン プリ ング 周波 数 は 2 XF 以上 必要 に な り ま 
す . 従っ て , も し サン プリ ング 周波 数 を 8 kHz 
に すれ ば , 音声 信号 は 4 kHz 以下 の も の し か 再 
生 で きま せん . 


4. 3. 2 実験 回 路 
今回 は PC が ` 人 間 語 ? を 話せ る よう に する 
た め , 最も 簡単 な た ヘー ドウ ェ ア を 試み まし た . 
方 法 は これ 以外 に も 多数 あり ます が , と に か く 
簡単 で , PC 本 体 に 影響 及ば さ な い よう に し た 
わけ で す . 
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ハー ドウ ェ ア を で きる だ け 簡 単に する た め , 
5 ンジ 2 ルン EEKGIVDE3 ( 朋 3E385 馬 MM 
ンプ リン グ 周 波数 は ソフ トウ ェ ア で 選べ る よう 
ほじ し で め り 83 吉 

さて , 難し い 話 は ぬき に し て 回 路 図 を 図 3 に 
示し ます . 注意 事項 及び 問題 点 を 読ん で か ら 作 
っ て みて 下さ い . 


ー 応 回 路 に つい て 説明 し ます が , 回 路 に 興味 
の な い 人 は 読ま な く て も か まい ませ ん . 

まず 入力 回 路 で す . 入力 回 路 は ラジ オ や テー 
プレ コー ダー の イヤ ホン 端子 か ら 入 力 さ れ た だ 音 
声 波形 を 。C-MOS の イン バー タ を 使用 し て , 
1 ビッ ト の デジ タル 波形 に 変換 し ます . 初段 の 
イン バー タ に 帰還 抵抗 を つけ , アナ ログ アン プ 
と し て 使用 する わけ で す . 次 段 の イン バー タ 2 
個 に 帰還 抵抗 を つけ た も の は , シュ ミッ トト リ 


入力 回 路 . 
470K ①② 


か で , アナ ログ アン プ で 増幅 し た 波形 を デジ タ 
ル 化 し て いま す . 

出力 回 路 は 。 で きる だ け 簡 単に する た め , ト 
ラン ジス タ 等 は 使わ ず ,TTL の イン バー タ て 直 
接 ス ピー カー を 鳴ら し て し まい ます . 電流 を 得 
る だ ため , イン バー タ を 2 個 並 列 に し まし た . 尚 , 
コン デン サ と 抵抗 も 並列 に し た の は ロー ノ パ ス フ 
ィ ル タ を 構成 する た め の で す . 

も し スピー カー を 大 きく 鳴ら し た けれ ば , 
トラ ンジ スタ で 1 段 の アン プ を 作れ ば よい で し 
ょ う . そう すれ ば , 出力 回 路 も TL を 使わ ず , 
C-MOS で すみ ます か ら , 使用 する IC は C-MOS 
1 個 ど だ け に な り ま す . 又 , そう すれ ば 出力 も テ 
ョ レコ ヨー ダー か ラジ オ に 接続 で きま す . 


4. 3. 3 注意 事項 及び 問題 点 
入出 カイ ンタ ー フ ェ イ ス を 作る 時 2 一 3 問題 


1MQ 


昌 KN | 入力 ポー ト 
100K 9 


0.00| /f 


こ デ ゴン ドル ツン 


イン バー タ は MOCI4069(C-MOS) 


出力 回 路 


1MG 


図 3 
入出 カイ ンタ ー フ ェ イ ス 回 路 図 


イン バー タ は 7404 


使用 部 品 


基板 (IC が させ る も の )X ぶ | 
IC ソ ケッ ト (I4 ビ ピン)X 2 
7404(TTL) 
14069(C-MOS) 
可変 抵抗 

470KQ X 2 

I00KO X | 

IMQ X 1 
固定 抵抗 

IMQO X1 

4002 で らい | 
コン デン サ 

0.0IzFX | 

0.00IZFX 1 
小型 スピ ー ヵ カベ 1 


5V 


40029 ぐら い 


1 


かぶ あ 訪 肝 員 月 た 』 ます 第 1 に 。 イン ター フェ イス 
を PC-8001 の どこ に 接続 する か に つい て で す . 
PC か ら 外 部 へ 出 て いる 外部 バス に ポー ト を 接続 
し よう か と 考え た の で す が , 回 路 が 複雑 に な り 
そう な の で や め に し て , 結局 プリ ンタ 用 の ポー 
ト を 使用 する こと に し まし た . プリ ンタ 用 ポー 
ト の 端子 構成 は PC-8001 の ユー ザー ズ マ ニュ ア 
ル に 載っ て いま す . この うち , 入出 力 用 に 1 本 
づつ 使用 する わけ で す . 今回 は 


入力 用 に 端子 番 号 21 番 の READY 
出力 用 に 端子 番号 3 番 の FD0 


を 使用 レ し まし た . 更に GND( グ ラン ド ) を , PC 
と イン シン ター フェ イス ボー ド 間 で 接続 し ます . 
実は , あと の 問題 点 は まだ 解決 され て お ら ず , 
読者 の 方 に 任せ る と いう こと に な り ま し た . そ 
れ は, 

* プ ブリ ンタ ポー ト に 接続 する た め の コ ネ ク タ 
* 電源 

の 2 点 で す . プリ ンタ ポー ト は 34 ピ ン の エッ 
ジコ ネ ク タ が あれ ば 簡単 に イン タフ ェ イ ス ボ ー 
ド と 接続 で きる の で す が , 34 ピ ン の エッ ジコ ネ 
クタ は あま り 市 販 さ れ て いな いた め , 入手 は 困 
難 と 思い ます . だ か ら と 言っ て まち が っ て も , 
PC の 基板 に 直接 ハン ダ づ け す る こと は し な いで 
下さ い 。 で きる だ け ワ ニ ロ クリ ッ プ か ミノ 躍 で 
接続 し て 下さ い . この 時 , 図 4 の よう に 隣 の 端 
子 や ,。 基板 の 裏側 の 端子 に は 接触 し な いよ うに 
注意 が 必要 で す . で きれ ば 必要 な 端子 以外 は テ 
ー ク で 覆う で し まえ ば よい と 思い ます . 
図 4 


3I 番 GND 2| 番 READY 3 番 PDO 


リン ンク シン ン ンジ クジ ググ ググ グン ググ グ シン ググ ング ググ ング 


正面 か ら 見 た 図 


1 ロフ 


ンク クジ シシ ルン 

31 番 GND -21 番 READY ~ 3 番 PD0 
上 か ら 見 た 図 

3 番 つ イン ター フェ イス 基板 の 出力 回 路 へ 接続 

2I| 番 み イ ンタ ー フ ェ イ ス 基 板 の 入力 回 路 へ 接続 

3| 番 一 イン ター フェ イス 基板 の GND へ 接続 


これ 以外 は テー プ で 覆っ て 接触 し な いよ うに する 

も う 1 つの 読者 の 方 に 任せ る 問題 点 は 電源 で 
す . これ は イン ター フェ イス 基板 上 の 1C に 供 
給 し て , ス ピー カー を 鳴ら す た め の 5 V の 電源 が 
必要 な の で す . 実は PC の プリ ンタ ポー ト 中 に 
も HIGHT” と いう 端子 が あり ます . テス ター 
で 測定 し て みる と 確か に 5 V あ る の で , 最初 は そ 
こ か ら 取 る こと を 考え た の で す が , 残念 な が ら 
今回 の 回 路 で は ダメ で し た . 
自信 の ある 人 は PC の 基板 内 の どこ か か ら 5V 
を 取り 出せ ば よい の で す が , 初心 者 に は 勤め ま 
せん . で きる だ け 他 の 電源 を 準備 し て 下さ い . 
使え そう な 電源 を 下 に あげ て お きま す . 


1. マイ コン 用 安定 化 電源 

2. テー プレ コー ダー な どの AC アダプタ ー 
で 4.5ー 5 V の も の . 

3. 最悪 の 場合 : 載 電 池 3 本 直列 で も 動く と 
思い ます . た だ し この 場合 は 新品 の 電池 を 使用 
し て 下さ い . 

次 に 初心 者 むせ け に 注意 事項 を 書い て お きま し 
ょ う . まず 1C の ピン 配置 に つい て で す . 今回 
使用 する IC は ,。C-MOS タ イプ と TTL タイ プ 
の イン ペー タ で す ., この 2 つの IC は タイ プ は 
違い ます が , ピン 配置 は 同じ で す . 


JP DS 4 こう と 
GND 一 
1 番 ピ ビン の 位置 を 示す 
た め の マ ー ク が どちら 
か つい て いる 


4 5V- SV 
8 9 0 U 上 2 13 14 


貞 IC は 基板 に 直接 ハン ダ づ け は し な いで 1IC 抵抗 を 回 す 方 向 が 異な り ま すか ら 注 意 が 必要 で 
ソケット を 使用 し て 下さ い , 又 C-MOS IC は す 
静電気 に 弱い の で 回 路 が 完成 する まで は アル ミ 
ホイ ル の よう な 導電 性 の も の に つつ ん で お く よ 
うに し て 下さ い 。TTL-IC の 場合 は そこ まで し さい . 
な く 〈 く て も か まい ませ ん が , や は リン ソケット に 装 
着 す る の は ハン ダ づ け を 終え を て か ら の ほう が い 


(CO7G| し ds の 。 
も う 1 つ , 可変 抵抗 に つい て 説明 し で て お きま | 


し ょ う . 可変 抵抗 は 一 般 に 3 本 の 足 で 構成 され 
て いま す . 各 足 の 機能 は 下 の 通り で す . 


次 は 出力 回 路 の チェ ッ ク で す . 図 6 の フロ ー 
eeassWiWG622 着 3220 ログ ラム で チェ ッ ク し て 下 


1 ひ 〇 ーーー ペ ヘ ヘス ヘス ヘス ペペ へ スン ーーー 〇 


に と 49 
回 路 図 中 に は 


c メー。 


と 書い て あり ます が , これ は 先 に 書い た 図 の 1 
と 3 又は 2 と 3 を 使っ て 構成 する こと に な り ま 
す . 実際 の 可変 抵抗 器 の 足 は 3 角形 に な っ て い 
て 下 の よ うに 対応 し て いま す . 


図 6 出力 回 路 の チェ ッ ク 手 続き 


テス トブ プ ログ ラム 
IO FOR M=I TO |I000 


> 20 0O 1 
5 2 EE2L た の UT &HI0,0 
30 OUT &HI0,1 


イン ター フェ イス が 完成 し た ら 一 応 チ ェ ッ ク 
し な けれ ば な り ま せん 。 まず IC を 姜 着 する 前 の M 

に , 総 て の 可変 抵抗 を 最大 に し て お いて 下さ きい. 

この 時 , 可変 抵抗 器 の 中 の 1 と 3 を 使っ た か , さて, 出力 回 路 で 音 が 出る 場合 に は , 次 は 入力 
2 と 3 を 使っ た か で , 最大 値 に する た め に 可変 回路 の チェ ッ ク を する の で す . この チェ ッ ク は 
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少々 面倒 を ので, まず C-MOS IC を 装着 し て 
電源 が 正常 な の を 確認 し た ら , 次 の プロ グラ ム 
の 項 を 読ん で , プロ グラ ム を 入力 し て 下さ い . 
実際 に プロ グラ ム を 動作 させ な が ら , 試行 錯誤 
で 調整 する わけ で す . 
音声 を 入力 し て (h コマンド) 記録 し . それ を 
再生 し て (t コマ ンド ) み て , その 音 に よっ て 調 
整 し ます . 
1. も し 音 が で な いな ら ぱ ば , 
100K2 と 1 MO の 可変 抵抗 を 下げ る . 
2. も し 何 も 入力 し な く て も 雑音 ば か りな ら ば , 
100H0O と 1 MO の 可変 抵抗 を 上 げ る . 
を 繰り 返し ます . 2 個 の 可変 抵抗 を どう 調整 し 
て も 全く 音 が で な いと か , 雑音 ば か りな ら も 1 
度 回 路 の 配線 を チェ ッ ク し て 下さ い . 


沿 , 470KQ の 可変 抵抗 は も まり いじ ら な い 方 
が 良い と 思い ます . も し この 抵抗 値 を 寺 に し た 
りす る と , C-MOS の イン バー タ が 壊れ か ね ま 
せ ぜん. 

調整 の 結果 , 音声 を 入力 し た 時 に は 音 が し て , 
何 も 入力 し な い 時 に は 静か な まま と いう 状態 に 
な っ た ら , 今度 は “ 音 ′” を 注意 深く 聴い て 下さ 
い . きっ と 雑音 の 中 に お ぼろ げに あな た の 声 が 
きこ えて いる と 思い ます . 


Tom の グラ 5 バ 

さて , 作製 し た 回 路 を 使っ て 音声 の 入出 力 を 
する わけ で す が , 次 の よう な 簡単 な プロ グラ ム 
を 作っ て み ま し た . 


TESEFVE 中 BmOF ツ Y aTe& 


define usSer functiari 1n と ation 


7JdHummy fiel1d statement 
7ge 革 string ヨ Poirniter addresS 


set ]1ower address 


"FEadH machine !ari ヨ uaae Pr0g ヨ Fam 


set Jelay と nunt 


7LISR1 is tal ト routine 


7LISRE is hear routine 


100C) 7 区 

UiO の <3 Liemo program for Section 4. 
240) <3 

1SQO ELEAR_ SOQ)HFFF 

140 TEFLIER1=&HAOOO ILEFLUSERS=&HAOOS 
150 FITELLI 韻 1 ヵ 1: 人 も)12B AS BE 
140) FTIELLI 持 1)12B AE に も )12B AS HL 中 
170 ML=VARFTR( に まま ) 

180 MMH=VARFTR(LI ) + 

150 FHEE ML-ー1)0OIFHEE MH-1)132 

09) 

デ 10 FR エ =HAOQOO_ TH MMHAOSE 

20 REALI LiFHEE 1 ヵ HL 

ラ 30 NEXT 1 

40 店 ELIE 表 10 

の 4316) 

ジ 40 INFILIT "CEHHHIANTLIE "5EHM ま 

70 F=INETR( "dthE1e"jEHNM* ま ) 

1 HPN_ F RFHELE 10 ょ 4 コア プロ テ 4 ロ ) 49 の ょ る 3 ょ マキ ロ 
マッ 0 HITR 60 

ヨコ 00 / テ 

ヨコ 10 /※ Lelay set 

40) の ャ ぅ 

SS30 INFILIT "EELAY ELINTE "5HY 

40 FREE HaAOSE THY IFITEE 多 HAOSS) HIY+ ミ 
Si5O RETLIRN 

SB60 7 

ご 70 / え TalE 

SEO 7 区 

3 コウ 20 合 =LIER1(O) 

400 RETILIRN 

410 7 テ 

420 7 芝 Hear 

430 7 区 

440 FRTINT "EEFEAE _ NM!!! 

455① 全 =LIERS(O) 

440 EEEF 

470 RETLRN 


1 ピロ 


4BO /※ 


490 ご aVe 

SO00 "※ 

510 FRINT "save routine" 
520 INFLT "FILE _NAHEI "5NNM ま 
530 HIFEN NM ま AE # せ 1 

S4Q FrR F=Q TO 81 

SSQ L=&HAO+F 

540 FIRE MLj ヵ LEFIKE MHL 
57Q LSET A ま = に ま :LSET E ま =Lb 
SS0 FUIT #1 

に 40) NEXT F 

600 ELHSE #1 

610 RETLRN 

620 /※ 

6SO /※ Load 

440 7 テ 

650 FRINT "1oad rautine" 
660 INFUT "FILE NAME: "NR まま 
70 HPEN NM AE 1 

680 FIR F=QO TO 81 

490 ET #1 

700 L=HAG+F 


FRE MLjLiFOKE NMHjL 
LSET に 中 ニ A 呈 ILSET 中 =B$ 


NEXT F 
ELISE #1 
RETLRN 


gwO DATA &Hc 
900 7? 2 
10 ENI 


この プロ グラ ム は , 全部 で 6 つの コマ ンド を 
持っ て いま す .h は 音声 を 入力 し て その デー タ を 
メモ リ 中 に し まう コマ ンド ,【 は メモ リ 中 の 音声 
デー タ を 出力 する コマ ンド で す . また , メモ リ 
中 の デー タ を ディ スク に し まう こと の で きる よ 
うに S (SAVE) 及び 1 (LOAD) が 用 意 し て あ 
り ま す ,. サン プリ ング 周期 を 自由 に 変更 で きる 
よう に d (DELAY) も 準備 し て あり ます . プロ 
グラ ム に つい て 順 を 追っ て 説明 し て いき まし ょ 
26 
120 行 の CLEAR 文 で は BASIC で 使用 する 


7iriPt file rame 


se て save address 

7move from memory to huf。 盾 1 
write SS4 hyte 

7eave HAOOO ー HEOGOGO 


7imnF ロ t file rame 


詞 


read EE hyte 

/L=high order nf 1oad adHdres ち 5 
set load address 

move from huf.1 to memory 
71oad %&HAOOO - HEOOO 


achine 1an ヨ ua ヨ e PrD ヨ Fam 』a ト a 


HATA &HcS)kH1E HaO) 久 HE1 HH4O) 放 HaO 
IATA HOej 放 HO 多 Hdb HH40) HH1 f) 色 HcE 
HATA HH1Bj 昌 に cd) HBS1 HaO)HOH) HEO 
HATA_ Hf) 色 H70)H23) 久 H7c エ Hfe HEO 
HATA HO)Hecj 久 HE ウラ H21)H40) HaO 
HATA HOej 導 HOB)H7e HH kH10 日 に 
IATA HEZ) 多 HaO HH1 1) HOH HO 叶 Hf7 
HATA HB)H7c Hf)gHEO テ HO ょ Hee 
IIATA &Hc ウ の ) 色 日 16) 久 HO0Oj HH15 HO) Hf 
HIATA H ニ 9 HH16) HOO jkH15)HSO) Hf 


メモ リ の 上 限 を 9FEFF 番地 まで に 制限 し ます . 
これ は , A0000-C000 番 地 ま で の 8 氏 分 の メモ リ 
を 機械 語 ル ー チ ン 及 び 音 声 デ ー タ の 格納 用 に 使 
用 する た めで す .140 行 で は 機械 語 ル ー チ ン を 使 
用 する た め に その 先頭 番地 の 定義 を し て お きま 
す . A000 番 地 か ら は 出力 の ルー チン , AO003 番 地 
か ら は 入力 の ルー チン と し て 使用 し て いま す . 
150 行 の FIELD 文 は | ディ スク と の デー タ の や 
り と り を GET, PUT で 行なう た め の も の で す . 
160 行 の FIELD 文 は ダミ ー で C$ と D$ に 
128 文 字 分 の 大 き さ を 与え る 目的 の み で 使用 し て 


いま す 。 ここ で , メモ リ 中 の デー タ の ロー ド , 
セー プ ブ を 行なう 方 法 に つい て 説明 し て お きま し 
ょ う . 実行 し た い 仕事 と し て は 7 ・2 節 で 説明 
し た 機械 語 フ ァイル の ロー ド , セー ブ と 同じ な 
の で す が , 通常 の 方 法 で は 8 K バ イト 分 の ロー ド , 
セー ブ に 1 分 程度 の 時 間 が か か っ て し まう よう 
な の で , ここ で 特別 な 方 法 を 使っ て ロー ド , セ 
ー ブ を 行なっ て いま す . 

まず セー ブ の 方 法 に つい て 説明 し まし ょ う . 
基本 的 に は PUT を 使用 し て いる の で , メモ リ 
中 の デー タ を 256 バ イト ずつ ラン ダム バッ ファ に 
3 待つ 放さ 反 は 性 以 0 串 生 9 る と に よっ て セー プ が 
実現 きれ て いま す . ここ で 問題 と な る の が , ど 
の よう な 方 法 で バッ ファ へ の デー タ の 転送 を 行 
な うか で す . PEEK, POKE を 使用 し て FOR 
NEBXT レー ブ プ ) で 繰り 返し た と ころ で は , この 
転送 に か な り の 時 間 が 消費 きれ る た め に セー ブ 
に 1 分 程度 の 時 間 が か か っ て し まっ た の で す . 
そこ で , ここ で は 文字 変数 と LSET 文 を 使っ て 
転送 を 行なう 方 法 を 考え て み ま し た . 3 章 で も 
説明 レ し た よう に , LSET 文 を 使え ば 文字 列 デー 
タ の 移動 が 生じ る と いう 人 性質 を 利用 し た の で す . 
150 行 の FIELD 文 で は A$ と B$ が 1 番 の ラン 
ダム バッ ファ 上 に と られ て いま すか ら ,A$ 及び 
BS に LSET 文 で 文字 列 の 代入 を 行 な を ば, バッ 
ファ へ の デー タ の 転送 が 実現 きれ る こと に な り 
ます . 問題 は 代入 する 文字 列 が . メモ リ 中 の デ 
ー タ を 表現 する よう に し て や る こと だ け で す . 
幸い N-BASIC に は , VARPTR 関数 が あり , 
変数 の 値 の 操作 等 が で きる よう に な っ て いる の 
で , これ を 利用 し て , メモ リ 中 の デー タ を 文字 
変数 で 表わす よう に し て いま す . ロー ド 時 は 同 
様 に し で , メモ リ 中 を 示し て いる 文字 列 に 対し 
て GET で 読み 込ん だ 文字 列 を LSET 文 に よ 
り 代 入 す る こと に よっ て 実現 し ます .160 行 に 表 
われ る C$ 及び D$ は この 目的 で 使用 する た め 
の 文字 変数 で す . 

この 先 の 説明 を する に は 文字 変数 が BASIC 内 
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部 で どの よう に 表現 され て いる か を 知っ て いな 
けれ ば な り ま せん (詳し く は , PC 参照 ). ま ず , 
BASIC の 変数 領域 に は , 文字 列 の 長き と , 実際 
に 文字 列 デ ー タ の 入っ て いる アド レス を 示す ポ 
イン タ と が 入っ て いま す . 


VARPTR が 返す 値 は , 実際 に 文字 列 の 入っ て 
いる アド レス で は な く , 長 さ と ポイ ンタ の 入っ 
て いる アド レス に な り ま す . 実際 に は , VARPTR 
の 返す 番地 に は , 文字 列 の 大 き さ , その 決 の 番 
地 に は , 実際 の 文字 列 デ ー タ の 入っ て いる 番地 
の 下 倍 バ イト , 続い て 上 位 バ イト が 入っ て いま 
す . で すか ら , 170 行 で は , C$ の 示す 文字 列 デ 
ー タ の 入っ て いる 番地 の 上 位 バ イト を 保持 する 
番地 が ML に 得 ら れ ま す . 同様 に し て , 180 行 
に は MH に DS の それ が 得 ら れ ま す . 190 行 で 
は POKE 文 に より C$ 及び DS. の 示す アド レ 
ス の 下位 を 0 及び 128 に 設定 し て お きま す . 

210 行 か ら 230 行 の ルー プ で は DATA 文 で 用 
意 し た 機械 語 ル ー チ ン を 読み A000 番 地 以 降 に 書 
き 込 み ま す . この よう に し て 機械 語 ル ー チ ン も 
BASIC で 準備 する こと が で きる の で す . 

240 行 で は , DELAY COUNT の 初期 設定 を 
行ない ます . 260 行 か ら 290 行 は この プロ グラ ム 
の メイ ンド ライ バ に 当る ルー プ で , コマ ンド を 
入力 し , 各 処 理 ル ー チ ン へ ON-GOSUB 文 で 分 
岐 し ます . 

310 行 か ら は DELAY COUNT の 設定 , す 
な わ ち d コ マン ド の 処理 ルー チン で す . 通常 こ 
の カウ ント は 10 か ら 20 で 良い で し ょ う . 10 で 約 


4 秒 。 20 で 約 8 秒 の 間 , 音声 の 入出 力 が 行なえ 
E3C 

490 行 か ら は S コマ ンド の 処理 ルー チン で す . 
A000 番 地 か ら C000 番 地 ま で の 8 K バ イト を , 256 
バイ ト ず つ PUT する た め に , FOR-NEXT で 
32 回 ルー プ を 回 し ます . 550 行 で は PUT すべ き 
メモ リア ドレ ス の 上 位 バ イト を 求め , 560 行 で そ 
の 値 を POKE する こと に より , C$ と D$ が 転 
送 を 行ない た い メ モリ 領域 を きす よう に し ます . 
570 行 の LSET に より メモ リ 領 域 か ら FIELD 
文 で 指定 し た A$, B$ へ の 転送 が 行なわ れ PUT 
の 準備 が 整 の うこ と に な り ま す . 

630 行 か ら は し コマ ンド の 処理 ルー チン で す . 
ロー ド の 手続 きも セー ブ の 手続 き と ,。 きわ め て 
良く 似 て いま す . まず GET に より A$, B$ に 
デー タ が 読み 込ま れる の で , これ を LSET に よ 
り , メモ リ 領 域 を さす C$, D$ に 代入 する こと 
に よっ て 転送 を 行なう の で す . 
790 行 か ら の DATA 文 の 内 容 は 機械 語 の プロ グ 
ラム で す . デー タ は 全て 16 進 数 で 書い て あり ま 
すか ら , 機械 語 を 御存知 な ら ば 容易 に わか る こ 
と と 思い ます . 


誠人 0 B ら の 

今回 は と に か く 簡単 に 話す こと を 目的 と し た 
た め , 多分 に 音質 が 般 性 に な っ て し まっ た よう 
で す が , と に か く 我 々 の 実験 で は PC は 人 間 語 
を 憶え , 話せ る よう に な り ま し た . 簡単 な イン 
ター フェ イス な の て で 読者 の 方 も 1 度 試し て みて 
下さ い . 腕 に 自信 の ある 人 は 回 路 を 改良 し て 音 
質 を 向上 させ る の も お も し ろ い と 思い ます . 
参考 アス キー 1979 年 2 月 号 特集 マイ ク 
ロコ ンピュータ ク と 音声 
23 ペ ー ジ ソフ トウ ェ ア だ け で も 音声 の 録音 再 
生 が 十分 に 可能 / 


4 請 4 請 辞書 」- ラ ンダ ム ア ク セス 


の まとめ - 


シク 69 パ の / ョ ンジ セ 欠 NZ アイ プレ の まとめ と し て , 
「 辞 書 」 プ ログ ラム を 紹介 し ます . この プロ グ 
ラム は , 実用 的 な 辞書 と し て は , ムダ が ある の 
で す が , 3 章 で 解説 し た 基本 的 テク ニッ ク が 実 
際 の プロ グラ ム 中 で , どの よう に 使わ れる か 理 
解す る の に は , よい 例 だ と 思い ます . 
この プロ グラ ム に は , 単語 と レコ ー ド 番号 を 
結び つけ る 対応 表 , 調べ た い 単 語 を 高速 で 探し 
出す 二分 検 策 , 対応 表 へ の 挿入 と 削除 , 未 使用 
レコ ー ド の スタ ッ ク に よる 再 利用 な ど が 応用 さ 
れ て いま す . 
この プロ グラ ム で は 3 つの ファ イル を 使っ て 
いま す 。 1 つ は , "dictio.dat* で す . この ファ 
イル は , 単語 の 意味 が 記録 され る , ラン ダム フ 
ァイル で す . 1 つの 単語 に つき , 1 レコ ー ド を 
使用 し て いま す . 2 番目 の ファ イル は \dictio. idx? 
と いう 名 前 で , 単語 か ら レ コー ド 番 号 を 引き 出 
す た め の , 対応 表 が 記録 され て いる , シー ケン 
シャ ルフ ァイル で す . 3 番目 の ファ イル は “dictio. 
fre” と いう 名 前 で , 未 使用 レヒ コード 番号 が 記録 
され て いる , シー ケン シャ ルフ ァイル で す . 
4 二 上 4 水 放 科 使 上 注 

初め て この プロ グラ ム を 走ら せる 場合 に は , 
2 つの シー ケン シャ ルフ ァイル を あら か じ め , 
作っ て お く 必 要 が あり ます . 作る と いっ て も , 
ディ レク トリ に ファ イル 名 が 載っ て いれ ば よい 
の で あっ て , 内 容 は 無く て も か まい ませ ん . し 
た が っ て , まず 次 の 命令 列 を 実行 し ます . 


OoPen "di に ti10。id%! as 音 1 
GE 


oPen "dictio.fre" as 拉 1 


これ で 準備 は で きま し た . で は , RUN し まし 


1 1 ら 


ょ う . 最初 に コマ ンド を 開い て きま す . コマ ン 
ド に は 6 種類 あり ます. 


1. append (追加 コマ ンド ) 

2 、 delete (削除 コマ ンド ) 

3 . list (一 覧 コマ ンド ) 

4 . search ( 検 策 コマ ンド ) 

5 . instring (部 分 列 検 策 コマ ンド ) 
6 . exit (終了 コマ ンド ) 


それ ぞ れ の コマ ンド は 頭 の 1 文字 の み 打 ち 込 
むこ と に よっ て 動作 し ます . この 場合 に キャ リ 
ッ ジ リタ ー ン は 不用 で す . 頭 の 1 文字 の み 入力 
すれ ば , 後 の 文 字 は 自動 的 に 表示 され ます . 例 
えば AZ と 入力 する だ け で , \append new key 
word? と 表示 し て , 追加 モー ド に な り ま す . 末 
定義 の 文字 を 入力 する と , BEEP し て , エラ ー 
を 知ら せま す . この 場合 に は 音 が 出る だ け で CRT 
上 に は 何 も 表 示さ れ ま せん . 次 に 各 コ マン ド の 
説明 を し まし ょ う . 

append コマ ンド : この コマ ンド は , 新しい 単 
語 と , その 意味 を 辞書 に 追加 する た め の コ マン 
ド で , “append : ?? と 聞い て きま すか ら , 追加 
し た い 単 語 を 入力 し ます . 次 に meaning:? と 


聞い て きま すか ら , その 単語 の 意味 を 入力 し ま 
す . 意味 を 入力 する と き に 注意 する こと は , キ 
Go りり) ルクル ニラ ンジ? 形 ペグ 59 る に と が で きる こと 
で す . こう する と , 意味 を 番号 順に 頭 を そろ え 
で 大 力 あ る よう な こと が で き て , と て も 見 や す 
く な り ま す . 


Fu 
commarnidiaPPed new に ey word 


aPPendi book 
mE さ ri1n* 
np ホフ 


3aPPendi ジ Penci1 
mean1in コ s 
nS エ シビ s4 り 

ら 3PPeH ロ i ア 

end of apPPend 


cormmand* 


1 1 ヨ 


すでに 登録 し て ある 単語 を , append で 再び 指 
定 す る と, 新しく 入力 し た 意味 が その 単語 の 意 
味 と な っ て 前 の 意味 は 失わ れ ま す . 

append モー ド か ら ぬ け 出 し て , command モ 
ー ド に 戻る た め に は , “append ? ? の 後 , キャ リ 
ッ ジ リタ ー ン の み 入 力 し ます . 以下 の コマ ンド 
も , それ ぞ れ の モー ド か ら , command モー ド 
に 戻る た め に は , すべ て キャ リッ ジリ ター ン の 
み 入 力 す れ ば よい よう に な っ て いま す . 

delete コ マン ド : この コマ ンド は , すでに 登録 
し て ある 単語 を 削除 する の に 使い ます . 

^delete : ?/ と 聞い て くる の で , 削除 し た い 単 
語 を 入力 し ます . そう する と , 対応 表 か ら 入 力 
され た 単語 を 削除 し . その 単語 の 意味 を 記録 し 
て いた ラン ダム ファ イル を , 後 か ら 追加 する 単 
話 の た め に 解放 し ます . も し 入力 され た 単語 が 
対応 表 に 載っ て な けれ ば “not found” と 表示 し 
て , 再び “delete : ?? と 聞い て きま す . 


に Oommarididelete Ley word 
deletei: hook 


deletek 
ernd of delete 


lisSt コマ ンド : こ の コマ ンド は , 現在 登録 さ 
れ て いる すべ て の 単語 と その 単語 の 意味 が 記録 
され て いる レコ ー ド 番号 , 最後 に 総数 と ラン ダ 
ム フ ァ イル の 総 レ コー ド 数 を 表示 し ます . 


commandi]l ist uP ド ey words 


PaPeF さ 
Perici 1 ンコ 


二 


humher of ド ey wordsi ご 
humbher of recordsi 


search コ マン ド : この コマ ンド は , 辞書 の 本 
来 の 働き , 単語 の 意味 を 表示 する も の で す . 
Ysearch : ?? と 聞い て きま すか ら , 意味 を 調 
べた い 単 語 を 入力 し ます . 対応 表 の 中 を 探し て 
その 単語 が 見 つか れ ば , 意味 を ディ スク か ら 読 
み 出 し て 表示 し ます . も し 対応 表 の 中 に その 単 


語 が 見 つか ら な けれ ば , not found? と 表示 し 
ま 03 計 
commandisearch Key word 
searchk? book 
n・ ホッ 

instring コマ ンド : search コマ ンド で は , 
単語 の スペ ル が 完全 に 一 致し な いと , 意味 が 調 
べら れ ま せん . スペ ル を 完全 に 覚え を て いな いと 
か , 名 詞 は 載っ て いる が 形容 詞 は 載っ て いな い 
な ど , 単語 の 頭 か ら 数 文字 目 ま で 調べ る こと が 
で きる と 便利 で す 、 その た め に 用 意 き さき れ た コマ 
ンド が , instring search, 部 分 文字 列 検 策 で す . 

Yinstring : ?/ と 聞い て きま すか ら , 調べ た い 
単語 の 前 か ら 一 部 分 を 入力 し ます . そ うす る と , 
入力 され た 文字 列 で 始ま る 単語 が キャ リッ ジリ 
ター ン を 入力 する た びに 1 つ ず つ , アル ファ ベベ 
ッ ト 順 に 表示 され ます . 目的 の 単語 が 表示 され 
た ら “y” を 押し て くだ さい , その 意味 が 表示 
され ます . 入力 され た 文字 列 で 始ま る 単語 が 対 
応 表 に な く な っ て し まえ ば “not found” と 表示 
| 関 ま 3 


commandiinstring search 


imstringi? aC 

a に と Pt 

aCCeS5 

ac と cident 

acComPany 

a と comPlish 

Yt . ナ シト ケ ” 用 カフ セイ スル . く モ フワ テ キ ヲ > ハ タス (carry out) 


instririgi? 
Break in 2540 
ロト 


iriStr1ngi ろ P 
aPar キ 

き PPEa1I 

ら PPEar 

る PPearari に BE 
aPPle 

aPPO1rit 
PP 0Oa と Ci 
aPrOni 

riot found 


instringi ア 
end pf imstriri ヨ Search 


と Ormimarid* 


exit コ マン ド : この コマ ンド は , プロ グラ ム 
の 終了 コマ ンド で す . 辞書 に 変更 が あれ ば , 変 
更 さ れ だ 対応 表 と 末 使 用 スタ ッ ク を ディ スク に 
書き 込み 変更 が な けれ ば , すぐ に 

\Good bye? と 表示 し て プロ グラ ム を 終り ます ., 


に 0mmaridiexit 


Good bye。 


. ロ ド 


4. 4. 2 プロ グラ ム の 解説 
1030 行 文字 領域 を 5000 文 字 分 割 保 し ます . プ 
ログ ラム は 32K で 試し た も の で す . 


1040 行 この プロ グラ ム で 使用 する 数 値 変 数 は 
すべ て 整数 型 で す . 


1050 行 変数 SIZE は 単語 の 最大 数 で す . 
1060 行 文字 配列 W$ ( ) は , 対応 表 の 名 前 


の 部 分 で , 単語 が アル ファ ベッ ト 順 に 入り ます . 


1070 行 数 値 配列 KR( ) は , 対応 表 の レコ ー ド 
番号 の 部 分 で , 単語 の 意味 を 記録 し て ある レコ 
ー ド 番号 が 入り ます . 


1080 行 数 値 配列 FS( ) は, 未 使 用 レコ ー ド 
を 再 利用 する た め の ス タッ ク で す . 


1090 行 特に 文字 変数 を 利用 する まで も な い の 
で す が , 見 や すく する た め に 2 つの 変数 を 導入 
し まし た . 文字 変数 CRS に は キャ リッ ジリ タ 
ー ン コー ド の 13 が , 文字 変数 LF$ に は ライ ン フ 
ィ ー ド コー ド の 10 が 代入 され ます . 


1100 行 数 値 変数 FLAC は ディ スク 上 の デー タ 
に 変化 が あっ た か どう か を 示す 論理 変数 で す . 

論理 変数 は 真 1 と , 偽 0 の 2 値 を 取り ます . デ 
ィ ス ク に 変化 が な い の に , まっ た だ た く 〈 同 じ デ ー タ 
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を 書く の は ムダ で す . そもそも , 辞書 は 引く た 
め に ある の で すか ら , 一 度 入 力 し て し まえ ぇ ば, 
ディ スク を 読 み 出 す だ け で 書き 込み は し な い の 
が 普通 で す . 

9 は 2 ポ 白人 ( 了 7 だ たき I に 。 dictiO. idx?7 と 
"dictio. fre? の 書き 込み を 省略 で きま す . 


1110 行 一 1210 行 対応 表 の 読み 込み で す . 数 値 
変数 N が 単語 の 総 雪 で , EOF 関数 を 使っ て フ 
ァイル が 終る まで , 単語 の 数 を 数 えな が ら 入 力 
し ます . 1180 行 に 注目 し て くだ さい . 機械 語 フ 
(9/ 必 の 生き 放つ 3 に ド うつ に 。 シー ケン シャ 
ルフ ァイル に お いて , 数 値 を 扱う 場合 PRINT# 
と INPUT# で 直接 数 値 を 入出 力 す る と ASCII 
形式 と な る の で 。 ムダ が 多く な り ま す . そこ で 
MK シリ ー ズ と CV シリ ー ズ の 関数 を 使っ て 内 


部 表現 の 形 で 出入 れ を する の で す . 一 般 的 に 次 
の 中 紋 ASKZc り 島 ま 9 請 
256 未 満 の 整数 の 場合 

PRINT#1, CHRS$ ( 多 ) : で 書き 込み , 


=ASC _ (INPUT$ ( 1,#1)) で 読み 出す . 


整数 型 の 場合 
PRINT#1, IMKIS (人 ) : で 書き 込み , 
=CVI (INPUT$ (2.,#1)) で 読み 出す . 


単 精 度 型 の 場合 
PRINT#1, MKS$ (X) : で 書き 込み , 
メーCVS (INPUT$ ( 4 , 1)) で 読み 出す . 
倍 精 度 型 の 場合 
PRINT#1, RKD$ (X) : で 書き 込み 
メニ CVD (INPUT$ ( 8 , れ ) ) で 読み 出す . 


1220 行 二 1310 行 未 使 用 スタ ッ ク の 読み 込み で 
す . 数 値 変数 FR は スタ ッ ク ポ イン タ で す . 


ll に) 


1330 行 一 1350 行 辞書 の 中 心 “dictio.dat” を オ 
ー プ ン し ます . 数 値 変数 MAX は ファ イル の 最 
大 レコ ー ド 数 で , 初期 値 は LOF 関数 に よっ て 
代入 され ます . レ コー ド の 区 分 は 前 255 文 字 が 意 
味 の 入 る 部 分 で , 文字 変数 MFS に 割当 て られ 
ます . 最後 の 1 バイ ト は , 意味 の 有効 長 が 入る 
部 分 で , 文字 変数 LS に 割当 て られ ます . どう 
し て この よう な 変数 が 要 る の か と いう と , シー 
ケン シャ ルフ ァイル で は 文字 列 を ディ スク に 書 
き 込 むと , その 文字 列 が 含ん で いる 文字 数 だ け 
し か 書き 込ま れ ま せん が , ラン ダム ファ イル に 
書き 込む 場合 は LSET や RSET に よっ て 余分 
な 空白 を 付け 加え て , 固定 長 に し て いる た め に ., 
読み 込ん だ と き に 余分 な 空白 も 入っ て し まい ま 
す . 出力 形式 が 一 定 文字 数 で 固定 し て いる よう 
な 表 の 場合 に は よい の で す が , 自由 書式 の 場合 
に は 空白 が 目 ざ さわ り で す . そこ で , ラン ダム フ 
ァイル に 書き 込む とき に , 文字 列 の も と も と の 
長 さ を 一 緒 に 記録 し て お こう と いう わけ で す . 


1360 行 一 1450 行 コマ ンド に 応じ て , それ ぞ れ 
の サブ ルー チン に 分 枝 す る 部 分 で す . コマ ンド 
入力 の 仕方 は いろ いろ ある の で す が , ここ で は 
INSTR 関数 を 使っ て み ま し た . 1410 行 で キー ボ 
ー ド か ら 1 文字 入力 し ます . その 1 文字 を 命令 
表 *esaldi′ か ら INSTR 関数 に よっ て 探す の 
で すめ . 例え ば `E” が 入力 され た な ら 数 値 変 
数 CM の 値 は 1, 『S” が 入力 され た な ら 2 と 
な り ま す . も し CM の 値 が 0 な ら ば , それ は , 
命令 表 に 載っ て な か っ た こと に な り ま すか ら , 
BEEP し て 再び 入力 待ち に な り ま す . 

コマ ンド を 入力 する 場合 に は , コマ ンド を 数 
文字 た た いて キャ リッ ジリ ター ン す る より も , 
ボタ ン 一 発 の 方 が 扱い や すい と 思い ます . また 
数 字 で 入力 する 場合 に は , 数 字 と 命令 と の 関係 
を 知っ て いな けれ ば な り ま せん が , 頭 文 字 だ け 
入力 する の な ら ば , 覚え や すい で し ょ う . た だ 
INPUT$ や INKEY$ を 使っ て 一 発 入力 する 場 


合 , 何 $ も 画面 に ヒコ ー バ ッ ク し な い の で , 応答 
に 工夫 が 必要 で す . この よう に 1 文字 コマ ンド 
の 場合 は INSTR 関数 が 便利 で す . 


1470 行 二 1700 行 exit コマ ンド の 処理 ルー チン 
で す . \exit? と 表示 し て , “dictio. dat? を クロ 
ー ズ し ます . も し ディ スク に 変化 が な いな ら , 
1690 行 に 飛ん で Good bye′ を 表示 し て プロ グ 
ラム を 終え を ます, ディ スク に 変更 が あっ た 場合 
に は 新しい 対応 表 と 新しい 未 使用 え タ ッ ク を 書 
き 込 まな く て は な り ま せん . 1500 行 1570 行 が 
対応 表 の 書き 込み で す . 1550 行 の MKI$ は 前 に 
説明 し た , 対応 表 の 読み 出し CVI に 対応 し て い 
ます .。 1 項目 の 切れ 目 に は カン マ ,” を 使っ て 
いま す . これ は 単語 の 中 に は カン マ が 含ま れ て 
いな いこ と ,CR プ LF で は 2 バイ ト 必 要 で す が , 
カン マ な ら 1 バイ ト で 済む こと に よる も の で す . 
1580 行 1670 行 が 未 使用 スタ ッ ク の 書き 込み で 
す . FOR-NEXT ルー プ は 必ず 一 回 まわ っ て し 
まう の で , FR= 0 の と き に は , ルー プ に 入ら な 
いよ うに し て いま す . も ちろ ん , これ は 対応 表 
の 書き 込み の 場合 に も 起き る 可能 性 が あり ます 
が , 単語 が ゲー つも な い 辞 書 な ど 意味 が あり ませ 
ん . それ に 対し て , 末 使 用 レコ ー ド が 無し と い 
う の は , よく ある わけ で す . 1660 行 は EOF コ 
ー ド を 分 離す る た め の 余分 な デー タ で す . 


1710 行 一 1840 行 search コマ ンド の 処理 ルー チ 
ン で す . INPUT 文 で 入力 する 場合 ,。 キ ャ リッ 
ジリ ター ン の み 入 力 する と , 以前 代入 され た 値 
の Eee が も GTGEs Esss0) ジン 0 ルノー シン 
の み 入 力 し た 場合 は 、。 その コマ ンド の 終了 と み 
な し ます の で , 1760 行 で KY$ に ヌル スト リン 
グ を 代入 し て , 1780 行 で 変化 し て いな いな ら ぱ ば, 
キャ リッ ジリ ター ン の み 入 力 し た と 判断 し て リ 
ター ン し ます .。 ヌル スト リング 以外 が 入力 され 
た 場合 に は , 入力 し た 文字 列 を 対応 表 か ら 探 し 
ます ., 2110 行 か ら の サブ ルー チン は 3 章 で 説明 


し た , 2 分 検 策 で す . も し 見 つか ら な か っ た な 
ら ば , “not found′ と 表示 し て 再び 入力 待ち と 
な り ま す . 見 つか っ た 場合 に は , その 単語 の 意 
味 , レコ ー ド 番号 R (M) に 入っ て いま すか ら ,。 
それ を GET# し ます . 1830 行 で GET# し た デー 
タ の 中 か は 必要 な デー タ の み を 切り 出す の に , 
LEFTS 関数 を 使っ て いま す . 


1850 行 一 2090 行 append コマ ンド の 処理 ルー チ 
ン で す . ヌル スト リン グ の 使い 方 は 前 と ほぼ 同 
じ で す . 1920 行 一 1960 行 で 単語 の 意味 を 入力 す 
る の で す が , ちょ っ と し た 工夫 が 凝ら し て あり 
ます . それ は キャ リッ ジリ ター ン も 含め て 入力 
する 方 法 で す . と いっ て も CR グ LF コー ド を プ 
ログ ラム で くっ つけ る の で す . 文字 変数 MS が 
入力 され た 意味 全体 の バッ ファ で , 文字 変数 M1S 
が 入力 され た 一 行 分 が 入り ます . まず , MS も 
M1$ も ヌル スト リン グ に 初期 設定 し て お きま す , 
次 に M1$ に LINEINPUT で 一 行 分 読み 込み ま 
す . それ を M$ に 加え て , 終り に CRS$ と LEFS 
を 付け る , この 繰り 返し で す . ここ で も , キャ 
リッ ジリ ター ン の み 入 力 し た 場合 を 意味 入力 の 
終り と し て いま すか ら , M1$ に 毎回 ヌメ ルス トリ 
ング を 代入 し て いま す . 1980 行 で 2 分 検索 サブ 
ルー チン を 呼ん で いき ます . も し 見 つか れ ば , 
レコ ー ド の 内 容 の み を 変え れ ば よい の で すか ら , 
2070 行 へ 飛び ます . 新入 り の 単語 な ら ば , 対応 
表 へ 挿入 し ます . 対応 表 が 更新 され た の で すか 
ら , 変更 フラ グ FLAC を セッ ト し て お きま す . 
末 使 用 スタ ッ ク を 調べ て まだ 余り が ある な ら は ば , 
その レコ ー ド を 使い 、 な けれ ば ファ イル を 拡張 
し ます . 2070 行 で ラン ダム バッ ファ に 書き 込む 
の で す が , その と き に 長 さ きも いっ し ょ に 書き 込 
み ま す . CHR$ 関数 と ASC 関数 は , MK シリ 
ー ズ と CV シリ ー ズ の 中 に は あり ませ ん が ,255 
以下 の 整数 を ラン ダム ファ イル と や り と りす る 
た め に 使う と , 1 バイ ト で 済み ます . 
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2100 行 一 2180 行 2 分 検索 サブルーチン で す . 
この グル レー チン は , 3 章 で 説明 し た も の と 
まう だ KMG で すす ので, そちら を 見 て くだ さい . 


2190 一 2300 行 iiSt コマ ンド 処理 ルー チン で す . 
単語 が ゼロ の 時 に FOR-NEXT ルー プ に 入ら な 
ECem 二 2230 条 ji に TE 交 を 入れ て あり ます . 


delete コマ ンド 処理 ルー チン で 
説明 


2310 一 2470 行 
す . 変更 フラ グ を セッ ト す る 以外 は 3 章 で 
し た も の と 同じ で す . 


2480 行 一 2640 行 instring コマ ンド 処理 ルー チ 
ン で す 。. 部 分 列 と まっ だ た く 同 じ 単 語 が あっ た 場 
合 に は その 単語 か ら , な か っ た 場合 に は その 部 
分 列 が 入る 太 き 位置 を は さん で いる 上 の 方 の 単 
語 , すなわち , その 部 分 列 を 含む 最初 の 単語 か 
ら 表 示し ます . 部 分 列 と いっ て も 頭 か ら 一 致し 
て いな けれ ば な り ま せん か ら ,1INSTR 関数 の 値 
が 1 か どう か 判断 し て いま す . 1 で あれ ば , そ 
の 部 分 列 と 単語 の 頭 部 が 一 致し て いる 単語 は な 
いこ と に な り ま す の で , “not found” を 表示 し 


ィ 


1000 
1010 
10zO 
1030 
1040 
105Q 
1040 
107Q 
108O 


/ di に モ 上 ュ 10n コ 1 ッ 


ELEAR 5QOO 

LEFINT AーZ 

三 17E ビ =5QO 

LiIM MM ま ( 三 ITZE) “word array 
IIM RR (ETIZE)"record array 
HTM FE( 王 ITZE) "free stacE 


て , 再び 部 分 列 を 聞い て きま す . 2590 行 で , 部 
分 列 を 含む 単語 を 表示 し ます . 2600 行 は , えー 
の 入力 待ち ルー プア で す . も し , キー が 押さ れれ 
ば , CR か どう か 判断 し ます . CR で あれ ば , 対 
応 表 の 次 の 単語 を 表示 し , CR で な けれ ば , その 
単語 の 意味 を 表示 し ます . 

部 分 列 に よる 検索 は , 便利 な 機能 で す . 通常 
の 完全 一 致 に よる 検索 は , 長い 名 前 を 1 文字 ま 
ち が え そく た だ た め に , 見 つか ら な か っ た り , 対応 表 
に は 余分 な 文字 が 付い た 形 で 登録 され て いる 場 
合 に は 見 つけ る こと が で きま せん . ある 項目 に 
つい て 調べ た いと か , 関係 の ある も の を 探し 出 
す 場 合 に は , INSTR 関数 を 使え ば , 簡単 に 処理 
CS まま 9 

以上 で この プロ グラ ム の 説明 は 終り で す . こ 
の プロ グラ ム は , 辞書 と いっ て も , INSTR コマ 
ンド が ある くら いで 。 ラ ング ダム アク セス デ ロ グ 
ラム の 骨組 み だ け で す . この プロ グラ ム を 中 心 
に , いろ いろ な ラン ダム アク セス の アプ リ ケ ー 
ショ ンプ ログ ラム を 書く こと が で きる と 思い ま 
が 


10 ウ 0 に R ま = ニ ビ HR も (1) :LF ま = ビ HR( 10 ) 

1100 FLA ロ = 

191(O 馬 4 

1120 / read index 

SEet0) の 

1140 ロ FEN "リロ ュ に ニモ ュ o idx! FR INFLIT AE 半 1 
115O_N=OQ 

1160 TIF EF ロ F(1) THEN 1E1QO 

1170_N=N+1 

118O_R(N)= ビ VI( TNFILIT ま ( 記 ) 后 1 ) ) 

1120 INFUT 半 1 ヵ MM 和 ま (N) 

1200 GTTO 1140 

1210 に L ロ EE 韻 1 

1220 < 

1230 / read free 5 上 ac に ド 

1240 ? 

1250 ロロ FEN "dd ュ に モ ュ op fre" FR INFLUT AS 1 


de2 


1S60_FR=Q 
1370 IF EnGF(1) THEN 181Q 
12SQO_FR=FR+1 
1220 FS(FR) =FUI (INFLIT ま も ( 記 ) 半 1 ) ) 
13QQ GT 1270 
1310 FLUSE #1 
1S20 
1330 PEN "dicti0 dat" AS 半 1 
1S40 MAX=LnF( 1 ) 
1S50 FIELL #1)255 AE MF ま )1 AE 上 ま 
1SeQ / 
1370 / aet commarnd 
SS0 ? 
1S50 PRINT /1ine feed 
1400 FRINT "commardi "si 
1410 FM ま =TNFLIT ま ( 1 ) 
142O CM=INSTR( "esa1di") FN) 
14SO IF FM=O THEN BEEF:GHTI 1410 
1440 nN_EHM _GUELE 1470)172071840) 190) ES10) で 450 
145O nHTO 137Q 
1460 
1470 FRINT "exit!" 
14EO ELCIEE #1 
1420 IF NHT FLAG THEN 1Z50 
15OO ? 


。 write jndex 
O HEFEN リ dj に ti0 1dis リ FR HLITFUT AE 1 
=4) FR 1T=1 Tn N 
FRINT #1」FHET も ま (R(T)) 5M ま (T) 5 の "5 
154Z の 0 NEXT 1 
1570 LTIEE 半 1 
1570 FLOEE #1 
1580。/ 
1520 / write free stacE 
1400 
1610 ijF FR=O THEN 145O 
1620 nmPEN "di に tiO.fre リ F ロ R HLITFLUT AE ま #1 
1 FR T エ =1 TI FR 
1440 FRINT 持 1jMET も (F 王 (1 ) ) 5 
1650 NEXT 1r 
1660 FRINT #1)FHR も (26) 5 
1670 CLTSE #1 
1680 ? 
16220 FRINT:PRINT "Eood bye。 "iPRTINT 
1700 END 
1710 / 
1720 / search 
1730 ? 
1740 FRINT "search key word' 
175O_ PRINT 
1760 FEY も ="" 
1770 INFUT"searchi リ 5EY ま 
1780 IF EY ま ="! THEN FRINT "end pf search"iRETILIRN 
1720 BEIUB 2110 7search 
18B00 FRINT /1inme feed 
IF_ NOT FnLIND THEN FRINT "mot 了 found IGT 175QO 
j20 5ET #1jR(MN) 
FRINT LEFT ま (IF)AEE(L あ ) ) 
り BHTG 175O 
1550 ? 
1 己 る 0 / aPPerid 
1870 / 
1580 PRINT リ aPpEPend new Eey word"'iFRINT 
1 ワウ 0 HIY 和 も = ニ リ 6 


ゞ 


1 1 日 


1300) 
1910 
19 ジ 0 


1 ウロ 
テ QOQ0Q 
ミ Q10 
ご OzO 


2070 
と 49)=16) 
OO 
ラ 100 
2110 
2120 
130 
2140 
2150 
2140 
2170 
2180 
2120 
2200 
2210 
2 タタ 0 
PE16) 
40 
ラッ セ 50 
2 クム 0 
ララ 70 
ララ 80 
2 タウ 0 
2300 
2310 
2320 
2330 
っ ラコ 40) 
2350 
2340 
2370 
2380 
2320 
2400 
2410 
2420 
24SQ 
2440 
245Q 
24640 
2470 
2480 
24920 
2500 
2510 
25Z0 
2530 
2540 


INFLIT "apperndi BEY ま 


1F EEY ま ="! THEN FRINT "end of appPend"iRETILRN 
FRINT "meanin コ ki" 

M ま ニ 『 Ll 

必 1 中" 


LINETNFLIT 1 も 
1F 1 まる 2 ! THEN MM も = 人 ま +M1 ます に R ま + す LF 和 まま EGRHT ロ HI 1940 


店 口 所 LE で 110 
1TF FLINLI THEN LH= ニ MIGHTI SO70 
FLA ベ ニー1 
FR 1=N TI HL STEF -1 
愉 和 ま ( エ +1 ) ニ 内 呈 ( 1 ) ER( エ +1 ) =R( 1 ) 
NEXT 1 
N=N+1 
いま (Ll) EEY 和 中 
ITF FR THEN_R(LI)= ニ FE(FR ) iFR= ニ FR 一 1 ELSE MAX=MAX+1 :R(L)= ニ MAX 
LSEET NMF まま = 中 LET 上 も = ビ HR 和 も (LEN( MM ) ) 
FLIT 提 1jR(HLU) 
5 ロ IT 18EO 


4 
/ binary Search 
ィ 


上 ニテ Q s 日 N+ 1 
IF 昌一 ヒ =1 THEN FLINI=OiRETILRN 
M=( ロ +L ) 


IF 中 (MM)= ニ EEY ま THEN FLINH=-1 iRETILIRN 
IF ゆま (NM) く RY も THEN L=M ELSE L=M 
GTC 140 


/ 115st upP Eey words 
ァ 
FRINT "11ist upP Eey words"iFRINT 
IF _N=Q THEN EE7Z7O 
FR 1=1 TH N 
FRTINT (1) ヵ KR(1 ) 
NEXT 1 
FRINT 
FRTINT "numEer of Eey wordsi VN 
FRINT "numEber of recordsi "3MAX 
RETLIRN 


/ delete Eey ward 
FRTNT "delete Eey word" 
FRTINT 
KEY 中 ニ 明日 
INFLIT"deletei "3EY ま 
TF EY ま =""! THEN FRINT "end of delete"iRETLRN 
EPSLIE 且 110 
TIF_NCT FLNL THEN FRINT "not found" IGT SS5Q 
FLA ロ ニー1 
N=Nー1 
FR= ニ FR+ 1 :F ミ (FR ) =R ( ) 
FR 1T=NM TI _N 
届 和 ま ( 1 )= 内 生 ( エ +1 ) sR( 1 ) =R( 1+1 ) 
NEXT + 
BT SS5O 
4 


? imsStriri ヨ コ Search 
FRINT "iristriria search" 
FRINT 

KY ま = リリ 

INELIT "instrinai 5 ド Y ま 


1.1 紀 


2SS0 IF RY$=V! THEN FRINT "end of instrina search"iRETLURN 


2S40 RUSLIHB S110 
2570 IF NHT FLINLI THEN NM=LI 


<SSO IF NmT INSETR(M ま (NM) )KY ま )=1 THEN PRINT "not found"iGHTn SEZO 


2S?0_ FRINT MM ま (NN) 

タム 00 A$=TNKREY 和 まま : IF A ま ="0 THEN 4OO 
2610 IF A$=CR ま THEN MM+1 :RhT SEEIO 
SeZO GET #1 ヵ R(N) 

geSO_ FRINT LEFT$ ま (IF も)AEE(L ま ) ) 5 

2640 5GHTU ES2O 


45W5 
の た め に 」 
前 に 紹介 し た 「 辞 書 」 で , ディ スク か ら の デ 
ー タ の 読み 込み 。 デー タ の 書き 込み の 仕方 は 理 
解い た だ けた と 思い ます 。「 ク レジ ッ ト 」 で は , 
ディ スク か ら の デー クタ を 読み 込ん で ,。 その デー 
タ を 処理 し て 再び ディ スク へ 書き 込む 動作 に つ 
いで 述べ ます ,。 この プロ グラ ム で は , 3 章 で 説 
明 し た レコ ー ド の 分 割 利用 も 応用 され て いま す . 


リク ジジ ンド に ピラ ジ ネス 


2 5 中 企 穫 S5 
初め て の プロ グラ ム を 走ら せる 場合 に は , 2 
つの シー ケン シャ ルフ ァイル を あら か じ め , 作 
っ て お く 必 要 が あり ます . この 理由 は , 「 辞 書 」 
と 同じ で す . し た が っ て まず 次 の 命令 列 を 実行 
し 8 


避 EEN 上 に redit id EGR TNFLIT AE 1 
CLOSE 
喘 選 己 付 詳 rdEiBRIt ま Ti に 選 軸 由 AE ェ 1 
CLHSE 


プロ グラ ム を RUN させ る と , は じ め に 年 月 
日 を 聞い て いま す . これ は , 後 で 説明 する 請求 
書 を 発行 する た め の も の で , 80 年 5 月 1 日 で し 
た ら , 80 グ 05/01 と 入力 し ます . する と ディ ス 
ク を 何 度 か アク セス し た の ち , コマ ンド 待ち と 
な り ,。「 シ ゴト 」 と 開い で きま す .。 コマ ンド に は 
次 の 8 種類 あり ます . 


1. オォ ワリ 
2. サー チ 


ペン コル 
ション 
カイ ヤク 
ツル ク 。 
シ ハ ライ 
セイ キュ ウ 


COO ココ の の 愉 CS 


それ ぞ れ の コマ ンド は 頭 の 1 文字 の み 打 ち 込 
むこ と に よっ て 動作 し ます . この 動作 は 「 辞 書 」 
と 同じ で す . 次 に 各 コ マン ド の 説明 を し まし ょ 
2 上 


724 り 計 語 コ に ッ シン トド Wa で の < マシ ドド は, ブログ 
ラム の 終了 コマ ンド で す . 対応 表 ま た は 請求 日 
に 変更 が あれ ば , 書き 込み を 行い ます .「 ゴ クロ 
ウサ ン 』」 と 表示 し て プロ グラ ム を 終了 し ます . 


サー チ コマ ンド : この コマ ンド は , 特定 の 一 
名 の 住所 , 先月 まで の 残高 , 今月 分 の 借金 , 請 
求 日 を 表示 し ます .「 ナ マエ ? 」 と 聞い て きま す 
か ら , 調べ た い 人 の 名 前 を 入力 し ます . 対応 表 
の 中 を 探し て , その 人 の 名 前 を 入力 し ます . 対 
応 表 の 中 を 探し て , その 人 の 名 前 が 見 つか れ ば , 
その 人 の デー タ を 表示 し て , 再び 「 ナ マエ ?」 
と 聞い て きま す . も し 見 つか ら な けれ ば ,「 ミ ツ 
み カリ マセ ン 」 と 表示 し て , 再び 「 ナ マエ ェ ? 」 と 
聞い て きま す . コ マン ド を 終了 し た い 場 合 に は , 
「 ナ マエ ェ ? 」 と 開い て きた 時点 で 。 キャ リッ ジ 
リタ ー ン の み を 入力 すれ ば , コマ ンド モー ド に 
戻っ て 「 シ ゴト 」 と 聞い て きま す . 以下 の コマ 
ンド も , コマ ンド モー ド べ へ, 戻る 方 法 は 同じ で 


1 選 ロ 


9 が 


ペン テリ ルツ 丹 較 lk ンジ ンド 人 環 古 の コマ ンド は ,。 すでに 
登録 し て ある 人 の デー タ を 変更 する た め に 使い 
ます . 「 ナ マエ ? 」 と 聞い て きま すか ら , 変更 し 
た い 人 の 名 前 を 入力 し ます . 次 に 「 ジ ュ ウ ショ ? 」 
と 聞い て きま すか ら , 住所 を 変更 し た けれ ば 新 
し い 佳 所 を , 変更 し た く な けれ ば キャ リッ ジリ 
ター ン の み を 入力 し ます . 次 々 に 「 セ ン ゲ ツマ 
の ョ 細 良 細 較 ンジ 8 拓 中 コン クツ ブン 。 クツ グ ? 」 
「 セ イキ ュ ウ ビ ? 」 と 聞い て きま すか ら , 変更 
し た な ら ば 新しい デー タ を , 変更 し た く な けれ 
ぽ ば, キャ リッ ジリ ター ン の み を 入力 し ます . 全 
部 聞き 終っ た だ ところで, 再び 「 ナ マ ェ ? 」 と 聞 
VSx@ さ ま 王 ls9 請 


イチ ラン コマ ンド : この コマ ンド は , 現在 登 
録 き さき れ て いる すべ て の 人 の , 名 前 , 住所 , 先月 
まで の 残高 。 今月 分 の 借金 , 請求 日 を 表示 し ま 
す . 最後 に 登録 きれ て いる 人 の 総数 , 及び ファ 
イル の 夫 き き さ を レコ ー ド 単位 で 表示 し て いま す . 
この と き , 人 数 と レコ ー ド 数 が 違っ て いま す が , 
これ は 1 レコード を 4 人 で 使っ て いる た めで 
す . 


カイ ヤク 。 コマ ンド : この コマ ンド は , 客 を 表 
か ら 削 除 す る の に 使い ます . た だ し , まだ 借金 
が 残っ て いる の に , 解約 し よう と する と エラ ー 
と な り ま ほす 。 


ッ ク 記 に ジン ョ ドド この コマ ンド は , 付け で 買い 
物 を し た と き に 使い ます .「 ナ マエ ェ ?」 と 聞い て 
きま すか ら 名 前 を 入力 し , 「 キ ン ガ ク ? 」 と 聞い 
て きま すか ら 金 額 を 入力 し ます . すでに 登録 さ 
れ で いる 客 な ら ば 今月 分 に 加算 し ます . 初め て 
の 客 な ら ば , 住所 と 請求 日 を 聞い て きま すか ら 
久川 内 ま 59 記 
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シ ハ ライ コマ ンド : この コマ ンド は , 借金 が 
返済 され た と き に 使い ます .「 ナ マエ ? 」 と 聞い 
て きま すか ら , 返済 し た 客 の 名 前 を 入力 し ます . 
次 に 「 キ ン ガ ク ? 」 と 聞い て きま すか ら , 返済 
し た 金額 を 入力 し ます . 


セイ キュ ウ コマ ンド : すべ て の 客 の 請求 日 を 
調べ て , 請求 日 に 当っ て いる 客 な ら ば , 請求 書 
を 発行 し ます . 


4. 5. 2 プロ グラ ム の 解説 
この プロ グラ ム は リス ト を 見 て いた だ いて も 
わか る よう に , 「 辞 書 」 を 基本 に 発展 させ た も の 
で す . 新た に 3 章 で 説明 し た , レコ ー ド の 分 割 
を 応用 し て いま すし , MK シリ ー ズ , CV シリ 
ー ズ に よる 数 値 デ ー タ の 変換 と 計算 を 理解 で き 
る と 思い ます . 


1080 行 数 値 配列 D( ) は , 客 の 請求 日 を 記憶 
し て いる 配列 で す . 


1130 行 一 1150 行 日 付 の 入力 で す . キャ リッ ジ 
リタ ー ン の み 入 力 し た 場合 に は , 入力 変数 の 値 
に 変化 が な いこ と を 利用 し た , 入力 方 法 で す . 
並 通 の 変数 な ら ば , 入力 変数 並び の 中 に 書い て 
お くだ け で 上 記 の 性 質 を 利用 で きま す が , DATE$ 
で ある と か , ラン ダム バッ ファ 上 の 変数 の 場合 
は 直接 , 入力 変数 並び に 書く こと は で きま せん . 
し た が っ て , も う 1 つ 別 に 変数 を 用 意 し て , そ 
の 値 を 代入 し て , 入力 が 終っ て か ら 再 び 元 の 変 
数 に 代入 し な お す と いう 方 法 を 使い ます . この 
場合 、 DO0S が その 役目 を 果 し ま す . 


1160 行 一 1270 行 対応 表 の 読み 込み で す . 名 前 
と レコ ー ド 番号 だ け で な く , 客 の 請求 日 も 同じ 
ファ イル に 書い て お いて , 同時 に 読み 込み ます . 
請求 日 は 255 以 下 の 整 数 な の で ASC 関数 を 使っ 
て 1 バイ ト の 数 値 デ ー タ と し て 出し 入れ し て い 


ます . (シーケンシャル ファ イル に お ける CV シ 
リー ズ と MK シリ ー ズ の 利用 の 仕方 は 「 辞 書 」 
に 述べ られ て いま す ) 

1390 行 で “credit. dat” を OPEN し た 後 , 
FIELD 文 で , 変数 へ の 割付 け を 行っ て いま せん 
が , これ は 後 で 述べ る よう に , 客 の レコ ー ド 番 
号 に 従っ て , その 都度 , 割付 け を 行っ て いる た 
めで す . 


1410 行 一 1500 行 コマ ンド に 従っ て 各 ル ー チ ン 
に 分 枝 す る 部 分 で す . ここ で も 「 辞 書 」 と 同じ 
よう に , INSTR 関数 に よる , コマ ンド 調べ を 行 
っ て いま す . 


1760 行 一 1880 行 サー チコ マン ド の 処理 ルー チ 
ン で す . ヌ ルス トリ ング を 使っ て ,、 キ ャ リッ ジリ 
ター ン の み の 入 力 の 検出 , コマ ンド の 終了 判断 
を 行っ て いま す . 1860 行 で , 対応 する レコ ー ド 
を GET# し て いま す . ここ で , 各 レ コー ド の 構 
成 を 説明 し まし ょ う , 各 レ コー ド は 4 人 分 に な 
っ て いま す . 


65 一 128 文 字 129!92 文 字 


193-255 文 字 


55 女 字 分 の 住所 4 文字 分 が 残金 。 4 文字 分 が 
今月 分 の 借金 
ADS BLS MBS 


レコ ー ド の 分 割方 法 に つい て は , 3 章 で 説明 
し た よう に , 4 人 分 の 変数 を 用 意 し て , 4 人 別々 
の プロ グラ ム を 作る 方 法 と 4 つの 要素 を 持つ 配 
列 を 用 意 する 方 法 と 4 人 別々 に FIELD 文 を 使 
っ て その 都度 変数 の 割付 け を 行う 方 法 の 3 つ を 
紹介 じ ま じ た 。 ここ で は , 最後 の FIELD 文 を 
その 都度 作用 させ る 方 法 を 採用 し まし た . 対応 


UN 己 己 


表 の 中 の 配列 R ( ) に 入っ て いる 番号 は , そ 
の 客 の デー タ が 入っ て いる レコ ー ド 番号 と は 1 
対 1 に 対応 し て いる わけ で は あり ませ ん , 0, 

1 東 二 26K3 は ラー ド 箸 号 1 に ,。 4。 5,。 6, 

7 は レコ ー ド 番号 2 に ,. と いう よう に 記録 され 
て いま す . 客 の レコ ー ド 番号 か ら , 実際 の レコ 
ー ド 番号 を 算出 し , その 値 に 応じ て , 変数 の 割 
付け を 行う の が , サブ ルー チン 「 レ コー ド プ ン 
カツ 」 です. 変数 R に 客 の レコ ー ド 番号 を 入れ 
て , サブ ルー チン へ 飛ぶ と , 変数 の 割付 け を 行 
い , 変数 R に 実際 の レコ ー ド 番号 を 入れ て 戻っ 
て きま す ., 文字 変数 ADS は 客 の 住所 , 文字 変 
数 BL$ は 前 月 まで の 差引 残高 , 文字 変数 MB$ 
は , 今月 分 の 借金 で す . 


1890 行 一 2100 行 ヘン コウ コマ ンド 処理 ルー 
ナン で す . 変更 な し の 場合 の た め に , 変数 1, 1$ 
を 使っ て いま す . 対応 表 と いっ し ょ に , 請求 日 
の 配列 を 出し 入れ し て いま す の で , 請求 日 に 変 
更 が あっ た か 検出 する た め に , 変数 D 1 を 使っ 
て いま す . 変更 が あっ た 場合 に は , FLAG を セ 
ツ I ド 還 で の ます. 
2110 行 一 2190 行 2 分 検 策 サブ ルー チン . 
2200 行 一 2350 行 イチ ラン コマ ンド 処理 ルー チ 
ン で す . 対応 表 の 頭 か ら 客 の デー タ を ディ スク 
か ら 読 ん で は , 表示 し ます . 


2360 行 一 2580 行 カイ ヤク コマ ンド 処理 ルー チ 
ン で す . 2470 行 で , 借金 が 0 で ある か 検査 し て 
いま す . 2570-2580 行 は , 3 章 で 説明 し た 削除 
ルー チン に 配列 D ( ) の 移動 を 加え た も の で 
す . 


2590 行 一 2980 行 ツケ コマ ンド 処理 ルー チン で 
す . 名 前 が 登録 し て ある 場合 に は , 2710 行 で , 
今月 分 の 借金 に , 今 入 力 され た 金額 を 加え て い 


ます .。 登録 され て な い 場 合 に は , 2790 行 一 2830 
行 で 挿入 を 行っ て いま す , この ルー チン は 3 章 
で 説明 し た も の に , 配列 D ( ) の 移動 を 追加 
し た も の で す . 未 使用 レコ ー ド が スタ ッ ク に 積 
まれ て いる 場合 は 同じ で す が , 積ま れ て いな い 
場合 に は , レコ ー ド が 分 割 き れ て いる た め に 余 
分 な 処理 が 必要 に な り ま す . それ が , 2850 行 一 2900 
行 で す . 2850 行 で 新しい レコ ー ド 番号 を 割り 当 
て ます , 1 レコ ー ド で 4 人 分 で すか ら , 残り 3 
人 分 は 未 使用 に な る わけ で す , これ を 新しく , 
未 使用 スタ ッ ク に 積み ます . スタ ッ ク に 一 度 に 
3 つ 積 まれ る の で す . 


2990 行 一 3140 行 シ ハ ライ コマ ンド 処理 ルー チ 
ン で す . 3120 行 で 残金 の 計算 を 行っ て いま す . 
3150 行 一 3500 行 モイ キュ ウ コ マ ンド 処理 ルー 
ォ ン で す . 3220 行 で 変数 D に 日 を 代入 し て いま 
す . 3210 行 一 3230 行 の FOR-NEXT ルー プ で 請 
求 日 に 当っ て いる 客 を 探し ます . 請求 日 に 当っ 

10OO 7 

1010 / 2LEYp ト 

1ozo ィ 

10SO ELEAKR 5OOO 


1Q4O LEFTNT RT リラ F 
105O 王 1ZE=5QG 


1060 HTM NM ま ( 王 1ZE ) / ナ マエ 
1070 HI KR syIW2EWI2E コ ー ド ラコ" ウ 
10EO HIhM NIIE パ ギュ コウ ビ "* 


の 2E3)02 ミ シヨ ウー し コート " 
1) LF 和 ま = ビ HR$ も (10) 


で LEEHH TE 


( 
( 
( 
10 ウ 0 HTM F ミ ( 
1100 に R ま = ニ ビ HK 
1110 上 LA ロニ 
05 と Yo) の 

11SQ HO まま = ニ HIATE ま 


て いる 客 を 見 つけ 出し た な ら , 3260 行 か ら の サ 
プル ー チ ン に 飛 び ま す . 変数 BL に 先月 まで の 
差引 残高 を , 変数 MB に 今月 の 借金 を 代入 し ま 
す . 借金 の 総計 が 負 の 場合 は , 請求 書 は 発行 し 
ませ ん . 先月 まで の 差引 残高 が ある 場合 に は 利 
子 が 付き ます, ここ で は 0.015 に し て お きま し た . 
3290 行 は , 利子 の 四捨五入 を 行っ て いま す . 


3510 行 一 3560 行 レコ ー ド 分 割 割当 の サブ プ ル ー 
チン で す . 変数 C% は , 1 レコ ー ド 中 , 何 番目 
の 部 分 か を 示し ます . 文字 変数 DUMMYS は , 
位置 を ずら す た め の , ダミ ー 変 数 で す , 変数 と 
し て は 用 意 さ れ ま す が , 文字 領域 は 消費 し ませ 
ん 。 


1140 TINPEILIT "ネー カト リヒ 5 ー ヨー ニュ ウリ ョ フチ 29" サイ リョ TIO ま 


115O TIATE ま =LIO 

116Q < 

1170 / フイ ゴウ ヒョウ ヨミ コミ 
11EQ < 


1120 HEEN "credit.1d り FHR TNFIUIT AE 半 1 


1200_N=O 

121O 1F E ロ F(1) THEN 1 プロ 
12 ジ 0 N= ニ N+1 

123O RCN ) 三 ビ V1( INFILIT( 表 ) 半 1 ) ) 
1240 HI(N) ニ ASEE( TNF'LT ま (1 ) 半 1 ) ) 
1255O FNFLIT 韻 1)NM 和 ま (N ) 

1240 GHT ロ 121O 

12 ク フ の EL ロ EE #1 

128Q ^ 

1 ジウ 。 / 三 ミ ヨウ | に コー ト ~ ヨミ コミ 
1300 <? 


1 


1310 
1320 
1330 
1340 
1350Q 
1340 
1370 
1380 
13?0 
1400 
1410 
142Q 
1430 
1440 
145Q 
144Q 
147Q 
1480 
1450 
15GQ 
1510 
5zO 
153O 
1540 
155O 
154 〇 
157 
15Ein 
5 ラロ 


1400 


1610 
16420 
1430 
16440 
1645O 
1440 
1470 
1480 
1450 
1700 
1710 
1720 
1720 
1740 
1750 
1740 
1770 
1780 
17?20 
1800 
1810 
1820 
1830 
18g40 
1850 
1840 
1870 
15E0 
1820 
1200 
1 ヶ 10 
1220 
1230 
1240 
1250 


PEN "credit、fre" FIHR TINPUT AS 1 
FR=Q 

IF E ロ F(1) THEN 137QO 

FR=FR+1 

FS(FR)=CVI( INFLIT ま () 半 1 ) ) 

EnHTI 13830 

FLCISE #1 


FEN リ credit。dat" AS 半 1 
MAX= ニ LUF( 1 ) 


。 GEF の 9 


FRINT 

ERJINII 細 だ 2 ド 3 

FM ま =INFLT 和 ま ( 1 ) 

CM=TNSTR( リサ へ パリ セリ ビ M ま ) 

IF FEED THEN BEEF'gGHT ロ 1440 

IN ENM GSLEB 15O」 1 770)1900) EEOO) EEAO」 表 600) BOOO) 生 140 
BHT 142O 


FRINT "33! 
FLUIEE 拉 1 
IF NHT FLAG THEN 1749 


21 の ヒョウ キヨ 
nHFEN "credit。 ュ di リリ FE ロ HER ロ LITEFHIT AA 1] 
FIHIR !=1 Tn N 

FRTNT 半 1 ヵ MET ま (R(1T))jFHR ま (FI(T) ) 5NM ま (1) 17) 
NEXT 1 
FLHEE #1 
テ 


/ = ジッ ヨウ し コー ト * カキ コ = 
IF FR=O THEN 1740 
FEN "credit.fre"' FnR CITFUT AS #1 
FR 1=1 Tn FR 
PRINT #1 KT*(FEE(T) ) 5 
NEXT 1 
FRINT #1,EHR$(26) 5 
CLOSE #1 


FRINT iPRINT "ココ "2 ロウ サフ テ ” グリ sFRTNT 
END 


/ サー チ 
ィ 


pRNNI 還 9 三 た り 

FRINT 

KY も = LIU 

INFUT "ナッ エ "5RY 中 

IF ERY$=!U THEN PRINT "サー チ オリ ワリ リ "iRETURN 
GELHB 2120 

IF NHT FLINEI THEN FRINT "ミリ カリ マセ フリ ERETILRN 
R=R(I) iGHIELIE 220 ま GET 1 ヵ R 

FRINT AL 5EVE(BL 和 も ) 5jEVE(ME ま ) (NM) 

5nT 1800 


2 PB 
【A 


PRINT "ハフ コウ リ 
PRINT 

KY も = LIU 

INPUIT "ナラ エリ 5EY も 


IF EY ま ="" THEN FRINT "バフ コウ オ ワ リ "ERETURN 


1960 
1 ウ 70 ELE 120 

1?80 IF NHT FH ロ LINE THEN FRINT "アリ マセ フリ "55HTH 1930 
1990_ R=R(M) :BHIELHE 20 GET #1jR 1 
OOO 1=AL 

0O10 INPUT の パ ュ ウジ ョ "31 ま : し LSET AL=1 ま 


QOSO 1=CVE(BL ま ) 

3 っ 03SO_ TINFPLUT "セー フケ "リー マテ トーフ リリ 5 TELEET EL* ま =ME 王 名 (T ) 
040 エニ CV 王 (ME ま ) 

2050 ITNPLHT リコ フケ "リバー 7 の "5 TILSEET NME ま =NME 選 も (T) 
Li1=HI(MY) 

INFILIT "セイ キュ ウ ビ " "HI(M) 

TF NnT Lil=Ii(M) THEN FLA ロ =ー1 

FILIT #1 ヵ 選 R 

HHTI 19SGO 


ニク サリ 

し =) 日 ニ N+1 

1F ロー し =1 THEN FIILINL=OIRETILIRN 
M=( 昌 TL ) 

TF NM も (M)=EY$ THEN FILINL=ー1 :RETLRN 
TF NM$(M)YEY$ THEN L=M ELSE LU=NM 
GTOU 215O 

2 細 コ ( チ ジ ジ 

2230 PRINT "イチ ラフ" IFRINT 

ララ 40 TF N=QO THEN 2SEO 
2 っ 250 ^ 


ラウ 60 FHR 1=1 TH N 
ララ 70 R=R( 1 ) :GHELE SGSOIGET 菩 1 ゅ R 
2280 FRINT NM* ま (1 ) , AL 中 
22 ツ 0 FRTINT TAB(15) 5CEVE(EL*) ょ CEVE(ME ま ) ヵ HI(1) 
2300 FRTINT 
2310 NEXT 1 
Ss20 FRTINT 
330 PRTINT "キャ 2 7 カ siNIBG 三 57 
3 PRINT "ファ ッ ル キオ キサ リ "5MAX 5 コート “"『 


350 RETLRN 
【M 


2370 。。 カイ f2 

880 2 

っ 30 PRINT "BY ヤ 2" 

2400 PRINT 

2410 ド RY$="" 

ラ 420 INFUT "ナマ エー リド Y 生 

っ 430 IF EKY ま ="! THEN FRINT "カヤ 7 ォ ワ リリ "iRETLRN 

ラ 440 RELB S1EO 

2450 IF NT FLNLI THEN FRINT "ミリ カリ マセ フ "BHT 400 
ラ 440 R=R(M) :GUSLIB SSOIFET #15R 
470 ITF CVS(BL ま )+CEVS(ME ま )=O THEN SG デ O 

248Q BEEF 

2490 PRINT UEING "マグ" サ " コキ -/ カカ " 半音 間 韻 韻 寺 拉 アリ マス ヨ 。 "5 CVS( HL ま ) 
2500 GT 2400 

2510 “ 

2520 FLAG ニ ー1 

253O _N=N-1 

2 上 40 FR=FR+1』FE(FR)=R(N) 

2550 FR 1=M TH N 

2560 NM ま ( 1 ) =NM ま (1+1 ) iR( 1 )=R( 1+1 ) :H( 1)=L(T+1 ) 

257Q NEXT 1 

2580 GHTH 400 

2520 ? 

2400 / 9 


1 らら 


2610 * 
2620 PRINT "97" 

2630 PRINT 

2440 KY*= リ " 

2650 INFUT "ナマ エ "jiKY$ 

2660 1F RY$=""! THEN FRINT "9 の 7 オ ワ リ "iRETURN 
2670 G ロ SUB 2120 

26S0 INFUT "キキ 2 カ " 2"jCH 

2690 IF NT FOUND THEN 2770 

2700 R=R(I) :GHSHH 3510:GET 皇 17R 

LSET ME*=MKS$ ま (CUE(MB$ )+CH) 

PUT #1R 

GTn 2500 


に ゴリ 
0 FRINT ET 

0 FLAG=- 1 

FR 1=N Tn HI STEF -1 

NM*(1+1 ) =NM$(T) :R(T+1)=R(T) iL(T+1)=T(1) 
0 NEXT 1 

N=N+ 1 

NM'$( 昌 )=KY* 

IF NHT FR=O THEN R=FS(FR) :FR=FR-1:R(I)=RIGHSHB 52OEEET 持 1)RiG ロ TI = ッ 50 
R=MAXx4 

Q FR 1=1 Tu 3 

FS(FR+1 ) =FR+1 

2880 NEXT 1 

28B90 FR=FR+3 

2200 MAX=MAX+1 

2910 R(U) =R 

2g20 5rELUB 3520 

2930 INPLUT リュ ウシ ョ ーー 31 ま iLSET AH] 

2940 INPUT "セイ キュ ウ ヒ * "jiH(HU) 

2950 LSET EL$=MKE$(0) 

2960 LSET ME$ ま =MK ま (CH) 

2970 FIT #15R 

2980 GT 2430 

25g0 ・ 

3000 / 3 ライ 

3010 ・ 

3020 PRINT の ライ" 

3030 PRINT 

3040 KY$="" 

3050 INPUT" け マエ リョ EY* 

3060 IF KY$="" THEN FRINT "リラ イ ワリ "RETURN 
3070 GSLIB 2120 

3080 FRINT 

3020 IF N ロ T FLNH THEN FRINT "イマ セ つ "GOTU SOSQO 
3100 INFUT " キ カ "2 の 5 エ 

3110 R=R(M) :GUEUB 3520:GET #17R 

3120 LSET BL*$=MK も (CVE(BL$)-1 ) 

3130 PIT #1)R 

3140 GOT ロ 3030 

3150 ・ 

3160 / セイ キュ ウ 

3170 

3180 PRINT "セイ キュ ウ " 

3190 FRINT 

3200 =VAL (RIGHT ま (HATE$ ヵ 2) ) 

3210 FnR 1=1 TI N 

3220 1F H(I)=h THEN GnEUB 3240 

323230 NEXT 1 

3240 RETIIRN 

3250 ? 


3240_ R=R( 1 ) iGHSELHB コロ 20 IGET #15R 

3 コ 270 BL=CVS( BL まま) iMB= ニ CVE(ME$) 

3280 IF BL+MBS=O THEN IN=OIGHTI 3480 

3290 IN=INT(BLX.01 コ + 。 号 ) 

3300 IF INSO THEN IN=O 

3S310 PRINT STRING ま (フウ テリ ー リ ) 

3 コ 3 コ 20_ PRINT TAB(EO) 3 %%※ セ イ ギ キュ ウシ ヨメ ええ リョ 5 丁 全 日 (5O ) 5 IATE$ 

3330 FRINT 

3340 PRINT NM ま ( 1 ) リサ マリ 

3350_ PRINT TAB(14) 5 AL も 

3360 PRINT 

SS37O_ PRINT TAEB(EO) IFRINT LIESEING "コン ガト リーブ ド 7 リカ 半 持 韻 韻 持寺 ぅ "5MB 
338EO FRINT TAE(SO) FRTINT IEING "リセ フケ リーフ ラテ" ./ リカ 学童 韻 井 持 竹 "5BL 

3 ココ 50 FRINT TAB(EO) FRINT USING "リル 半井 寺 提 韻 革 圭 寺 ) "5TN 
340O_ FRINT 

3410 FRINT TAE(EO)EFRINT LETING "ゴウ ケイ 半 韻 韻 韻 韻 提 培土 "5EL+ME+TN 
4SO_ FRINT 

854S⑨ 中 RIN AB( 14) 5 "2/ ョ ウキ セイ キュ ウ モウ シア ケ ~ マス " 

3440 PRINT 

3450_ PRINT TAB(SO) 35 リアス キー シュ リタ アラド KK。" 

3440 FRINT TAB(SO) 5" 征 110 トウ キョ ウ ト ミナ ト 7 ミナ ミア オヤ マ 1 王 ー14-1 アオ ヤッ マヒ *~ 5F" 
3470 FRINT STRTNG ま (7 ラリー") YE に と 
3480 LEET BL も =MRE も (BL+IMB+IN) iLEET ME まま =MKS ま (OO ) 

FLT #1jR 

RETLIRN 


全 ジ コ ニ ド 7 ガリ 

ビ メ =(R IMHLI 4)*\ ム 4 ょ ドニ R 半 4+1 

FIELHI #1, EZ AS HLMMY も , 4 AS AL 中) 4 AS BL ま , 4 AS ME* 
RETILIRN 


1 ら 


5 章 で は , Disk BASIC の 著者 それ ぞ れ に , 
Disk BASIC の 機能 や ディ スク に 対す る 疑問 を 
読者 の 方 に 明確 に 理解 し て 頂け る よう に ., QUE 
SION を 』P で み ま し た . 
初歩 的 を こと か ら , ディ スク の 高度 な 部 分 に ま 
で 質問 する よう に 心掛け て 行ない まし た . 

他 の 間 で , 理解 で き な か っ た 部 分 は 。 この 5 
で 補っ て 頂け る と 思い ます 
2 ペク の バード,。 ソフ ト 面 に つい て 色々 な 角 
度 か ら , 多種 多様 の 質問 を 行ない まし た . 
解答 者 は , Disk BASIC の 著者 大 野 氏 , 飯田 
氏 , 鈴木 氏 で す . 
質問 を 担当 し た の は , 出版 部 の 田口 で す 
文章 中 の 敬称 は 省 か せ て 頂き ます . 


Ti 


1 ディ スク と は 何 か 


田口 コ ンピュータ の 拡張 イン ター フェ イス と 
し て , ディ スク と 呼ば れ て いる も の が あ 


り ま す が , そもそも , 何 が 目的 で 何 を さ 


1 選 紀 


鈴木 ・ 


O&A 


せる も の な の で し ょ うか. 
そもそも の 叙 
デー タ を 記 境 保存 し て お く こ と で す . テ 


且 き を いえ ば 当然 の 吉 と し 


ー プ レ コー ダ み た いな る の で で , 言っ て し 
まえ くば テー プレ コー ダ は 人 間 の 声 や 音楽 
を 志 境 する や の 『 それ に 対 四 で ⑬ アカ イズ 


多 は コリ ンジ ピラ ドー クタ の 計 だ CZ は WE の ES の 
な が っ た ディ スク に な ら 当 然 PC か ら の 
デー タ を 記憶 する も の だ と 解 札 で きま す 


・ プ ログ ラム や , - デ ー タ の 保存 を し て お く 


も の で すね . 


・ プ ログ ラム も 広い 意味 で は 1 つの デー タ 


で すか ら ね . 


・ ディ スク を PC に つけ た 場合 の メリ ッ ト , 


20 リ PINI は な 220G3i の ! 


・ こ の 本 の 第 0 章 に も 記述 し て いま す が デ 


ィ ズ ク の メリ ドリ ZN と Il 仙 6 間 22 語 久 の 欠 出 
力 が 高速 で ある , 容量 が 大 きい , な ど が 
あげ られ ます . 


鈴木 : 


カセ ッ ト で デー タ を 処理 する プロ グラ ム 
を 書い て みる と その メリ ッ ト が , 良く 〈 理 
解 で きる と 思い ます よ . 例え ば , PC#1 に 
載っ て いた 名 簿 管 理 プ ログ ラム が , デー 
タ 処 理 の 良い 例 で す . この プロ グラ ム は 
デー タフ ァイル を カセ ッ ト 上 に 作っ て い 
る の で す が , ファ イル の 読み 書き に 時 間 
が か か る と いう 欠点 が あり まし た . それ 
と , デー タフ ァイル を 読む の に 時 間 が か 
か る と いう こと は , 読ん で いる 最 中 に , 
ERROR が 出る 事 が 多く な り ま すね . 
こう いっ た 欠点 を カバ ー で きる 記憶 装置 
と し て Disk が ある わけ で す . 

Disk の 速度 と 信頼 性 は カセ ッ ト の 比 で は 
な いわ け で す . も っ と も , 高速 で 信頼 性 
が 高い と いっ て も 限度 は あり ます . ディ 
スク の ディ メリ ッ ト は その あたり か ら 生 
IGG《⑯ の 7505F ぐ TA 

デメ リッ ト は , 全く 〈 逆 の 事 が いえ る と 思 
いま す . 

デー タ 処 理 が 遅い , 容量 が 小さ いな ど で 
3 

これ は 用 途 に よる の で す が , 大 量 の デー 
タ を 高速 に 処理 し な けれ ば な ら な い 用 途 
が ある わけ で す . 要 は ディ スク が その 用 
途 の どの あたり まで を カバ ー で きる か が 
問題 な わけ で す . ビジ ネス 等 の 分 野 や , 
科学 技術 計算 の 分 野 で は カバ ー で き な く 
な る こと も ある と いう こと で すね . 

この 事 は , 第 1 章 で 詳し く 説 明 し て あり 
ます . 


ディ スク の 働き 


: ディ スク で は ディ スケ ッ ト と いう も の が 


使わ れ ま す が , ディ スケ ッ ト は どう いう 
働き を を する も の な の で すか . 

ディ スケ ッ ト の 働き を 理解 する に は , ド 
ライ プ と ディ スケ ッ ト の 役割 り を 比較 し 


田口 : 


鈴木 : 


飯田 : 


田口 : 


飯田 : 
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52C8G9 が 議 れ は 度 テ ー プ レコ 
ー ダ と カセ ッ ト テ ー プ の 役割 り と 考え ら 
れる わけ で す . 

ジーコ ヨー ク グ が デイ スク で 。 カセ ッ ト 
テー プ が ディ スケ ッ ト に な る わけ で すか . 
その 通り で す . 実際 に 記憶 を 担当 する も 
の 3 細 2 彰 億 バット で あり 。 ディ スケ ッ 
ト に 記憶 きせ る た め の も の が ドラ イブ や 
イン ター フェ イス に な る わけ で す . 


8 コッ ョ ド に デー アタ を 落と す と か , 


記憶 させ る と いう ふう に 言い ます が , ど 
の 庄 2 な 形 で ダ ィ スゲ ケッ ト に デー タ が 記 
憶 さ きれ て いる の で し ょ うか . 

デ ヂ ディスケット は , 磁気 テー プ を 1 枚 の 円 
毅 に た だ よう な も の で す 。 その 上 に , テ 
ー プ レコ ー ダ ー で 録音 する よう に , 磁性 
的 に デー タ を 記録 し ます . そし て , レコ 
ー ド の 様 に , 書き 込み , 読み 出し 兼用 の 
ヘッ ド が 接触 し な が ら , ディ スケ ッ ト が 
回 転 し て , デー タ を 読み 書き する わけ で 
す . 通常 コン ピュ ー タ の メモ リ 上 に は , 
基本 的 に 8 ビッ ト で パラ レル に 入っ て い 
お わけ で すけ れ ど も , これ を シリ アル に 
変換 し て 記憶 し て いま す . 


MM ジョ ツク グセ クタ 


シリ アル や トラ ッ ク , セク タタ と いっ た 言 
葉 の 意味 を 知ら な い 人 が いる と 思い ます . 
ディ スケ ッ ト の 中 で セク タ , トラ ッ ク は 
どの よう に し て 分 けら れ て いる の で すか . 
ez 多 6 グ クシ ョ グ と (は どの よう に 管 
理 さ れ て いる の で すか . 

トラ ッ ク は , ヘッ ド の 通る 道筋 の こと で 
す . モノ ラル の テー プ " レ コー ダ な ら 行 き 
DI の 2 ジェッ ク お 府 ボカ レゴ ュ テ ーー プレ 
コー ダ な ら 行 き の 2 本 , 帰り に 2 本 で 計 
4 本 の トラ ッ ク が あり ます . ディ スケ ッ 


大 野 : 


ト に は トラ ッ ク が 何と 35 本 , し か も エン 
ドレ ス に な っ て いる わけ で す . 

セク タ は , 1 本 の トラ ッ ク を 扱い 易い よう 
に , 16 個 に 分 けた も の で す . ヘ ッ ド を トラ 
ッ ク 数 だ け 用 意 し て お 〈 く の が 勿論 , 一 番 良 
いわ け で す が , フロ ッ ピ ー の 場合 は 一 個 
の 2 る 用 、 し し て それ を , ステ ッ ピ ン 
グモ ー タ ー と 呼ば れる モー タ で 移動 する 
わけ で す . そし て 目的 の トラ ッ ク ま で た 
どり 着く と 決 に 目的 の セク タ を どう や っ 
て 呼び 出す か , と いう 事 な の で す が , ま 
372 ニー は ジリ アル に 入っ て いる の で , 
1 と 0 の 列 な ん で す . で すか ら ど こ か 
ら 必 要 な バイ ト が 始ま っ て , どこ で 必要 
な バイ ト が 終る か と いう の は , 全然 わか 
ら な い の で す . そこ で , それ を ある 程度 
区 切れ ば いい の で す が , 例え ば トラ ッ ク 
を 1 セク タ に する と , それ を 同期 する チ 
ャ ンス は 1 回 に な り ま す . 同期 する と い 
う の は , シリ アル と パラ レル を 変換 する 
最初 の タイ ミン グ を 握 む こと で す . それ 
KG 策 上 周 に つき 1 回 し か チャ ンス が 
な い の で , 1 回 失敗 する と も う 1 回 まわ 
っ て くる まで その チャ ンス は 来 な い の で 
す . で すか ら , 時 間 的 な ロス が 大 きく な 
る の で ,。 トラ ッ ク の 情報 を 適当 に 分 け て 
や り 。 それ に よっ て まず 必要 な タイ ミン 
グ を 得る 為 の チャ ンス を 作る の で す . 例 
々 くば カセ ッ ト テ ー プ で 256 バ イト お き に マ 
5 きれ だ り l34 る の と いう の と 似 た よう 
な 事 な の で す . つま り 同 期 の チャ ンス を 
作る と いう よう な 意味 で す . 

他 に ,。 1 トラ ッ ク に セク タ が 1 つ し か な 
いと する と , 1 トラ ッ ク 中 の 或 デ ー タ だ 
けが 欲し い 場合 , 最初 か ら 読 ん を で いか な 
けれ ば な り ま せん が , 1 トラ ッ ク を セク 
に 分 ける こと に よっ て , 必要 な デー タ 
を すぐ に 取り 出す こと が で きま す . 
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口 : ト ラック の 中 に 1 セク タ な ん て 事 は , 通 


大 野 : シ 


飯田 


常 あ り ま せん が , その 場合 は 。 1 つ 1 つ 
読ん で いか な けれ ば な ら な いと いう 事 で 
すね . 


で の で 9 。 
田口 : 


それ か ら も う 1 つ , 用 語 事 典 の よう に な 
っ て し まい ます が , シリ アル と か パラ レ 
ル に つい て , お 開き し た い の で す が . 
リア ル と は 直列 , パラ レル と は 並列 と 
いう 意味 で す . コ ンピュータ の 内 部 で は , 
デー タ は パラ レル で 扱わ れ ま す が , ディ 
スク に は シリ アル で 記憶 され ます . 


: 何故 シリ アル で 入れ る の か と いう と , 別 


に ヘッ ド が 8 個 用 意 き れ て いれ ば パラ フレ 
ル で 入れ る の が 一 番 良 い の だ けれ ど , 高 
価 に な り ま す . シリ アル で 入れ れ ば , へ 
ッ ド が 1 つ で 済み ます . 


4 MOUNT の 働き 


田口 : 


大 野 : 


まず ディ スク の 中 に ディ スケ ッ ト を 差し 
込み 。 必ず Disk BASIC の シス テム を 
呼び 出し た 決 の 動作 に MOUNT, と いう 
命令 が あり ます が , 何故 MOUNT を す 
る の か , その 必要 性 と は 一 体 何 な の で し 
の 4 の が 

少し 話 が 飛び ます が , ディ スケ ッ ト 内 に 
保存 され て いる 情報 を 扱う 場合 に 
ザー は ファ イル 名 と いう 名 前 に よっ て 論 
理 的 な も の と し て ファ イル を と ら え る て, 
それ に 対し て ア クセ ス よう と IMU ま 95 
と ころ が , 実際 に ディ スケ ッ ト を 扱う た 
め に は , その 名 前 の ファ イル が ディ スケ 
ッ ト 内 の どの 場所 に ある か が わか っ 
な けれ ば な り ま せん . ユー ザー の 側 と し 
て は , ファ イル を 完全 に 名 前 だ け で 参照 
し た い の で すか ら ,。 ファ イル が どこ に あ 
る か と いう 情報 は BASIC の 方 で 知っ て 
いな けれ ば な ら な いこ と に な り ま す . デ 


* ーー 


KS 


田口 : 


飯田 


ィ ス ケッ ト 上 で の 記 境 は セク タ と いう 単 
位 で 扱 か われ ます が , 1 セク タ に は 256 バ 
イト し か 記憶 で きま せん . その だ ため に , 

ファ イル の 大 き さ が 何 KK バ イト に も な り , 
1 つの セク タ に 入り きら な い ゅ 場合 に は , 

1 つの ファ イル の 内 容 が 複数 の セク タ , あ 
る い は 複数 の トラ ッ ク に また が っ て 記憶 
され る こと に な る わけ で す . で すか ら 
BASIC は ファ イル の 内 容 が ディ スク 内 の 
どこ の トラ ッ ク , セク タ か ら 始 まっ て , 

Ba の) ュ ら クジ 2(|E3ZjpX 人 BKG SG 
と いう こと を 知っ て いな けれ ば な ら な い 
Ce 0) ES 

この よう に , BASIC は ファ イル の 名 前 と 
その ファ イル の 使用 し て いる ディ スケ ッ 
ト の 領域 と の 対応 関係 を 管理 する 役割 
を 持っ て いま す . この 対応 関 作 は その デ 
ィ ス ケッ ト に 固有 な も の で すか ら , ファ 
イル の 内 容 と と も に 同一 の ディ スケ ッ ト 
上 に 記録 し て お きま す . MOUNT は , こ 
の 対応 関係 を ディ スケ ッ ト か ら 読 み 出し , 
メモ リ 中 に ロー ド す る 働き を 持っ て いま 
す . ファ イル を 参照 する 際 に は , この 対 
応 関係 が 常に 必要 と な り ま すか ら , 

MOUNT に より メモ リ 中 に 読み 込ん で お 
け ば , その 後 は メモ リ 中 の 対応 関係 を 用 
いて 高速 に 処理 が で きる よう に な り ま す . 
それ で Disk BASIC 中 の MOUNT 命 
令 が 必ず いる と いう 事 な の で すね . 

それ か ら も う ひ と つ . 

1/0 ポー ト が 外 に 出 て いる 必要 性 及び メ 
リッ ト , デメ リッ ト 的 な も の と は 一 体 何 
ぐし まめ 


: 何故 1 プ O ポー ト が 外 に 出 て いる の か と 


いう 事 に つい て 云え ば , それ は 基本 的 に 
は まず 拡張 ニ ユニット を 前 提 に し て いた か 
らち です. イン テリ ジェ ント 化 さ れ て いる 
ら ゆ 旨み ププ グ に し (1 つつ の) モリ ジミ ニレ 4 


田口 : 


飯田 
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田口 : 


飯田 


大 野 : 


田口 


大 野 


1 らら 


に な っ て いる と いう こと で す . 通常 フロ 
ッ ピ ー ド ライ ブ 本 体 を 制御 する た め に は , 
複雑 な プロ セス が か 必要 で す . ヘッ ド を 移 
全員 明 @ 還 ベッ ド を ロー ド し て ,。 読み た い 
2 の 49 に で など 。 な など.。 これ ら を 
PC 本 体 に や ら せ る の は , 大 変 で す . し た 
が っ て ,。 もう 1 台 デ ィ ス ク ド ラ イブ する 
為 の 専用 の CPU を 用 意 し ,. それ ら 全 て 
を や ら せ て , PC 本 体 か ら は , 何 ト ラッ ク 
の 何 セ クタ を 読め 、 と いう よう な 高度 な 
命令 を 行う ) だ け で 済む よう し て いま す . 
そこ で , 1/0 ポー ト の 信頼 性 が 一 番 問題 
に な る と 思い ます が , ディ スク の 信頼 性 
は 勿論 ,【 プ 0 ポー ト の 信頼 性 が いい 加減 
28 う 83 は コブ イス ク は 不能 に な っ て し 
まい ます .1/0 ポー ト の 信頼 性 は どの 位 
2 人 Aa よう か 、 


: 信頼 性 と いう より 寧ろ , 安全 性 は あり ま 


す . 何故 か と いう と , 1 プ O0 ポー ト で は , 
ホス ト と ドラ イブ に 区 切ら れ て いる の で , 
ドラ イブ に 事故 が 起 っ て も ホス ト ま で は 
影響 は な いし , ホス ト に 事故 が 起 っ て も 
ドラ イブ に まで 及ぶ 事 は な い の で す . 


ディ スク の 起動 手順 


出す よう に な っ て いる の で すか . 他 の 機 
種 で は ソフ トウ ェ ア で や っ て いる よう で 
す が . 


: ハー ド 的 に は 必然 性 は あり ませ ん . 


リセ ッ ト ス イッ チ を 入れ な く て も パワ ー 
を 入れ た だ 時点 で ディ スク が 動く こと は あ 
り ま る 


: ハー ド 的 に は 必然 性 が な いと いう 事 は ソ 


フト 的 に は , 関係 が ある の で すか . 

ソフ トウ ェ ア 的 に は , リセ ッ ト ス イッ チ 
に よっ て , ディ スク が ブー ト す る 必然 性 
は 当然 あり ます . ソフ ト の 方 で 管理 し て 


6 
田口 


鈴木 : 


いる の で , リセ ッ ト し た 時 点 で ディ スク 
が つなが っ て いな けれ ば 普通 の N-BASIC 
の 抽 @ ペ グー ト し ます 。 リ セッ ト し た 時 
点 で N-BASIC が PC 本 体 に ディ スク 
ドラ イブ が つなが っ て いる か どう か を チ 
ェ ッ ク す る わけ で す . つ な が っ て いれ ば 
KR2 天 位 22 の 中 に シス テム ディ スケ ッ ト が 
入っ て いる と いう 事 を 前 提 と し て そこ か 
ら Disk BASIC を 読み 出し ます . 以上 
の 作業 を する と いう シー ケン ス が プロ グ 
ラム で 組ま れ て いる の で す . 


ディ スク の 人 性能 


・ デ ィ ス ク の 性 能 に 記憶 容量 が あり ます が , 


それ が 大 きい の か 小さ い の か , その 辺 を 
も う 少 し 詳し く お 願 いし ます . 

計算 に よれ ば , 月 刊 ア スキ ー の 紙面 に 字 
を びっ し りう め て , 32~-36 ペ ー ジ 位 が 1 
必 の 6 スケット に (シス テム ディ スク 
Ss0832 く PTG。 学生 健 空 の ディ スク ) に 入 
り ま すか ら , 結構 量 が 大 きい の で ビッ ク 
り 員 生ま す -。 


: 倍 密 度 で すか ら 普 通 の ミニ ディ スケ ッ ト 


の 倍 入 る と いう こと で す . 


・ それ か ら , ディ スク を PC に つけ た 場合 


は どれ だ け 便 利 に な る の で し ょ うか . 


・ デ ィ ス ク を つけ て 一 番 便 利 に な る と いう 


の は カセ ッ ト の 時 と 比較 する と よく わか 
り ま す . 例え ば , カセ ッ ト し か 使わ な か 
っ だ た だ 時には, カセット は ほとん ど プ ログ 
ラム の LOAD, SAVE(PC で は CLOAD., 
CSAVE) に 使わ れ て いま す . し か し ディ 
スク の 場合 , 当然 それ も 出来 る の で す が 
プロ グラ ム 中 で デー タ を 処理 する 能力 が , 
カセ ッ ト よ り も ずっ と 強力 に な る わけ で 
す . た と えば , 名 簿 管 理 ア ログ ラム の 名 
壮 の デー タ の 処理 等 で すね . 


田口 : 


飯田 : 
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田口 


1 


ディ スク 上 の シス デム ソ ズ ト 


どう し て デイ スグ に シス テバ ツウ クト が 入 
っ て いる の で すか . 

ドラ イプ を 持っ て いな い ユ ー ザ ー の 為 を 
考え て いる の で す . ドラ イプ を 動か す 為 
に は , ある 程度 の 量 の ソフ ト が いる の で 
す が , ドラ イブ を 持っ て いな い ユ ー ザ ー 
に は , PC に それ だ け の ソフ ト を 積む と そ 
の 分 だ け メ モリ を 使え な く な っ て し まう 
の で す . それ で , ドラ イプ が つい て いな 
い 時 に は その 不用 な 部 分 を ーー ザー が プ 
ログ ラム に 使え る よう に し よう と いう の 
が , 目的 で す . 


REMOVE の 働き 


: PC 本 体 の メモ リ の 節約 の 為 に シス テム ・ 
ソフ ト を ディ スク 中 に 用 意 し て いる と い 
う 事 で すね . 
シス テム ・ ソ フト は メモ リ 内 に お さき まり, 
次 の 順 庄 と し て MOUNT する の が 第 一 
の 条件 で す . その 後 は どう すれ ば ディ ス 
ケッ ト 中 の デー タ を 読み 出す 事 が 出来 ま 
すか . 

: デー タ を 読み 出す 場合 も , 書 込 む 場 合 も , 
扱う) デー タ の 型 に よっ て 操作 を 変え な け 
れ ば な り ま せん . プロ グラ ム フ ァ イル を 
読む 場合 と 。 デー タフ ァイル を 読む 場合 
と で は 操作 が 変わ っ て くる わけ で す . さ 
ら に デー タフ ァイル に は , シー ケン シャ 
ルフ ァイル と ラン ダム ファ イル が あり ま 
すか ら , この どちら か に よっ て も 操作 を 
変え る 必要 が あり ます ね . 
具体 的 に 書け ば , プロ グラ ム フ ァ イル の 
読出 し に は load, 書込み に は , Save ラ 
ンダ ム フ ァ イル の 読出 し に は GET#, 書 
込み に は PUT#。 シー ケン シャ ルフ ァ イ 


大 野 : 


田口 : 


・ デ ィ ス ケッ ト の 使用 が 終っ て , 


ル の 読出 し に は INPUT#, 書込み に は 
PRINT# を 使用 する こと に な り ま す . 
読出 し , 書込み 用 以外 の ステ チー トメント 
も , 対象 に と する ファ イル の 型 が 限ら れ 
iG ま 3 還 2 草 G は 必 の ト ジン トド 関 
数 を , 対象 と する ファ イル の 型 に よっ て 
分 類 し て 説明 し て いる わけ で す . 

ドラ イプ 
か ら デ ヂ ディス ケッ ト を 抜き 出す 前 に 必ず 
TeInO Ve する の が 大 事 な の で す が , TeImo 
Ye の 持っ て いる 役割 と は 何 な の で し ょ う 
か . 
mount と いう の は PGI に デイ スク ン 
トド を は ゆん 0 ま 和男 た は 朋 IA2! の j で 
あり ,「 も う , デ ィ ス ケッ ト を 出し ます よ 」 
と いう の が 『emoVve な わけ で す . 勝手 
に 人 間 が ディ スケ ッ ト を 差し 返 え て も そ 
れ は も う PC に は 分 ら な いわ け で す . と 
ころ が ディ スケ ッ ト に は , 入っ て いる 情 
報 を 管理 する 為 に 必要 な 情報 と いう の が 
ある わけ で す 。 デ ヂ ディ スケ ッ ト に 対し て 実 
際 に 書き 込み を 行っ た 場合 ,、 つ まり ディ 
スケ ッ ト の 持っ て いる 情報 が 増え た 場合 
は , 新しい ファ イル を 作っ て , そこ に 情 
報 が 増え た と いう こと を 入れ て , その フ 
ァイル が ディ スク の どの 部 分 か ら 始 まっ 
て いる と いう 様 な 情報 を ディ スク 上 に ち 
ゃ ん と 書い て お く 必 要 が ある の で す . 
remoVe を する と いう の は , ディ スケ 
ッ ト 上 の 書き 込み や その 他 の 行為 が すべ 
て 終っ た の で , ドラ イブ か ら 抜 き 取 る と 
いう 事 を PC に 知ら せる 役目 も 持っ て いま 
59 記 

も し remove を せ ず に ドラ イブ か ら デ 
ィ ス クッ ト を 抜 《 と か , を 忘 
れ て ディ スク 本 体 の 電源 を 切っ て し まっ 
た 場合 。 デ ィ ス ケッ ト が 受け る 影響 は ど 
ん な も の で し ょ うか . 


Tei10 Ve 


飯田 : 
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田口 : 


1 コス 


で 2 です 


remove を 忘れ た か ら と いっ て , ディス ク 
が ダグ ダメ に な る と は か ぎり ませ ん .mount し 
て か ら 読 み 出し の み 行 っ た 場合 に は 何 の 
影 絡 も 与え ませ ん が , 書き 込み や や 削除 を 
行っ た 場合 に は ディ スク を ダメ に し て し 
まう こと が ある の で す . すなわち , FAT 
に 変更 が あっ た 場合 に は 必ず remove を 
し な けれ ば な り ま せん .remove を 忘れ た 
時 に デー タ が 壊れ る わけ で は あり ませ ん , 
次 回 , マウ ント し た 時 に 読み 出さ れる FAT 
人 半 の 普 き まで お か ら 。 て そこ で ディ スク に 
書き 込み を 行う と , 大 切な ファ イル を 壊 
(0 表 まだ 選 が ある の で す .。 


・ つ まり ディ スケ ッ ト の 情報 は 大 切な も の 


remove を 忘れ て は な ら な い 


な の で , 
と いう 事 で すね . 
の 大 切 さ を 忘れ な 


remOo Ve 


MSAG 人 KU いで すね 。 


セー ブ プ の 種類 


次 に 大 切な も の と し て , SAVE コマ ンド 
が あり ます が , これ に は 通常 の SAVE の 
他 に アス キー SAVE と いう の が あり ます 
が , 通常 の SAVE と は どこ が 違う の で し 
中 2 


0 ロク 22 が を SAWE し て で て 。 ブ ログ ラム アフ 


ァイル を 作る 人 為 の コマ ンド な ん で す . こ 
れ は BASIC の 機能 に な り ま す が , N- 
BASIC で も Disk BASIC で も 一 緒 で , 
一 種 の コン パイ ラ み た いな 働き を も っ て 
いて , 人 間 が キー ボー ド か ら プ ログ ラム 
を 入力 し , それ を メモ リー 中 に 納め る 時 
に は , も う プ ログ ラム は コン ピュ ー タ 用 
に 形 が 変わ っ て いる の で す . コン ピュ ー 
タ 用 に プロ グラ ム の 形 を 変え る と いう 事 
は メモ リ が 少量 で 済み ,. ある 程度 実行 も 
早く な る と いう 事 で す . 


大 野 : 
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田口 : 


の コン ピュ ー タ 用 に 形 を 変え た た プロ グ 
ラム を 内 部 形式 の プロ グラ ム と 呼び ます 

それ に 対し て , 人 間 が キー ボー ド か ら 入 
力 し た 形 の プロ グラ ム を アス キー 形式 の 
プロ グラ ム と 呼び ます . 普通 の save の 
場合 に は , ディ スク に 内 部 形式 の 形 で 記 
録 す る わけ で す よ . ア スキ ー SAVE と ぃ 
う の は アス キー 形式 の プロ グラ ム を ディ 
スク に 記録 する の で す . 内 部 形式 の プロ 
グラ ム の 方 が メモ リ が 少量 で 済み ます か 
ら ,Save する の に 必要 な 時 間 も 短 いこ と 
に な り ま す . カ セッ ト へ 記録 する 場合 は , 
そん な 理 申 か ら 内 部 形式 の プロ グラ ム を 
記録 する わけ で す が , ディ スク の 場合 に 
は , 速度 が 速い の で , 内 部 形式 で 記録 し 
2 と 5 串 7 ス キー 形式 で 記録 し よう と , 

記録 に 要する 時 間 は そん な に 変わ り ま せ 
ん か ら , どちら の 形 で 記録 し よう と か ま 

わな いわ け で す 

アス キー SAVE で は , LIST を 取っ た 
時 に 出 て くる の と 全く 同じ 内 容 が ディ ス 
ク に 記録 きれ て いる の で す . 

で すか ら , た いし た 違い が 出 な いか も し 
れ ま せん が , 長い プロ グラ ム を SAVE す 
る と 長き が 変わ っ て くる 事 が あり ます . 


DATA フ ァイル の 種類 

伏 に ファ イル の 事 で す が , シー ケン シャ 
ノレ ファ イル と ラン ダム ファ イル の 違い は 
何で あり , ユー ザー が 使う 場合 に は ど ち 
ら が 便利 な の で し ょ うか . 


: まず 違い に つい て で す が , これ は カセ ッ 


ト を 例 に と っ て 説明 し ます . 


ジ シー ケン シャ ルフ ァイル と いう の は , デ 


ー タ が 非常 に 長い 1 本 の 線 の 様 に 続い て 
ーー を 読み 出す 時 に は , 
最初 か ら 順 々 に デ を 読み 出し て 行き , 
いつ で も 旨 時 3 常に 自分 の 手元 に 来 


鈴木 : 


大 野 : 


鈴木 : 


135 紀 


た 情報 だ けし か な いわ け で す . 次 を 読む 
と か , その 邊 に ある デー タ を 読む 為 に は , 
根気 よく 1 つ 1 つ 追っ て ゆく し か な いと 
いう の が シー ケン シャ ルフ ァイル で す 。 
これ に だ に 対し, ラ シ ク アラ 作 必 用 ほ だ 
と えば カセ ッ 本 Mo レコ ー ド 


の よう な も の で す . カセ ッ ト が 一 次 元 上 
で ある の に 対し , レ SE 

て あり ます . 2 
ある わけ で すか ら . 場 所 さる れ ぼ ば 


カセ ッ ト の 儀 に 最初 。 
て も , デー タ を 持っ 
これ が ラン ダム ファ イル で す 。 


と いう の は ほ 。 べ 
ルト コン ベア に の っ て くる デー タ を 自分 
の 欲し い デ ー タ が 来る まで まっ て みか らち 双 

り 出す 。 と いう 事 で すね 。 そ し て ラン ダグ 
ム フ ァ イル の 方 は 、 い つ で も 自分 の 人 狗 し 
い デ ー タ を 取っ て くる 事 が 出来 る わけ で 
すね . 
どちら が 便利 か と いう と, それ は 非常 に 
むず か し い 所 を の で す が , 当然 、 デ ー タ 
が どこ か ら で も 取り 出せ る と いう 意味 で 


は , ラン ダム ファ イル の 方 が 非常 に 便利 
な 様 に 思え ます . し か し , それ な り の 手 
順 と いう も の が ぁ (9290 の 
ファ イル の 場合 に は , どこ を 持っ て 
人 PT 
ら な いわ け で す . こち ら て で 場所 を 管理 す 
る と いう 事 で す . 
要する に 欲し い 情 報 が どこ に ある か と い 
う 事 を 知っ て いな けれ ば な ら な いわ け で 
すね . 
それ に 対し て , シー ケン シャ ルフ ァイル 
は 非常 に 単純 な わけ で す . た え ず , も っ 
て こら れる の は 1 個 ど だ け な の で すか ら , 
欲し い デ ー タ が 出 て くる まで 待っ て きえ 
いれ ば よい . つま り 不 便 な 様 で いて 使い 


鈴木 ・ 


飯田 


大 野 : 


飯田 : 


易い と も 云え る わけ で す .。 で すか ら 実 際 
に どちら を 使う か と いう の は , 非常 に む 
ず か し い 所 な の で す . ラン ダム ファ イル 
と いう の は , シー ケン シャ ルフ ァイル の 
機能 も 持ち ます か ら , ラン ダム ファ イル 
を 使っ て , シー ケン シャ ルフ ァイル の 様 
な 動作 を や ら せ て も 悪く な い の で す . そ 
れ な り に 管理 を し っ か り , つま り 最 初 か 
ら 読 ん で 来る と いう よう に すれ ば 良い の 
KG99 記 


: する と 何故 。 ラ ンダ ム フ ァ イル と シー ケ 


ン シ ャ ルフ ァイル を わけ , それ ぞ れ の 機 
能 を 持た せな けれ ば な ら な い の か と いう 
事 に な り ま すね . 

ラン ダム ファ イル と いう の は 使い 方 が 圧 
倒 的 に 面倒 な ん で す よ . 


: 世の中 の 仕事 の 殆ど は シー ケン シャ ルフ 


ァイル で 間に合う の で す が , より 高度 な 
機能 を 持っ た ファ イル を 作り た いな ら ば , 
ラン ダム ファ イル に し な けれ ば な ら な い 
と いう 事 で す . 

た と えば 1 日 の 仕事 を まとめ て 処理 する 
な ん て 事 が 多い 訳 で す よ ね . いつ も 大 き 
な ファ イル の 書き 換え を いつ も や っ て い 
る 訳 で は な いで し ょ う . 

ラン ダム の 方 が 情報 処理 が 早い の で す . 

どこ の デー タ で も 持っ て こら れ ま すか ら 
ね . 

あと シー ケン シャ ルフ ァイル と いう の は , 
バッ ク が 出来 な いと いう の が 致命 的 で す . 
一 度 デ ー タ を 読ん だ ら , 次 に 読む と き は , 
も う 一 度 始 めか ら 検 索 の や り 直 し と いう 

こと に な っ で で, そこ が , 不便 な と ころ で 
すね . 


11 


田口 


鈴木 : 


183 


OPEN と CLOSE の 働き 


sz 放 作 履 避 ② つ Mei で は この 辺 に し まし て , 
ディ スク の OPEN, CLOSE の 機能 に つ 
いて , 知り た い の で す が . 

具体 的 に OPEN と CLOSE の 機能 を フ 
ァイル と ファ イル 番号 と を 対応 づけ る こ 
と で 説明 いた し まし ょ う . 

プロ グラ ム 中 で デー タフ ァイル を 扱う 時 
な ん で す が , この と き , ファ イル の 名 前 
で は 扱わ ず に 番号 で 扱う の で す . する と 
最初 に ファ イル 番号 何 番目 は どの ファ イ 
ル 名 に あたる か を 対応 づけ し な けれ ば な 
ら な く な り ま す ., OPEN は これ を 定 言 す 
る の だ と みて いる わけ で す . 

非常 に お も し ろ い の は , 対応 する 動作 で , 
ファ イル の 番号 と いう の は , 最大 で 15 ま 
で 使え る わけ で すか ら , どの ファ イル が 
どの ファ イル 番号 に 対応 する か を OPEN 
で 指定 し て プロ グラ ム 中 で 使う わけ で す . 
デ ヂ ディス ケッ ト 上 の ファ イル 和 群 の うち 最大 
15 個 まで ファ イル 番号 と 対応 づけ る 事 に 
よ 55i 使 る 訳 で す 。 が, 思い 出し て も 
らい たい の は , カセ ッ ト で す . 

カセ ッ ト と いう の は , シー ケン シャ ルフ 
ァイル を 扱い ます が , 同時 に , ファ イル 
1 個 し か , 使え な い の で す . 
PRINT#-1 と いっ た コマ ンド が カセ ッ ト 
に デー タフ ァイル を 作る コマ ンド な ん で 
す が , カセ ッ ト で は , た っ た 1 個 し か オ 
ー プ ン で き な い ファ イル の ファ イル 番号 
が , 一 1 に 固定 され て いる わけ で す . 
の の AZ 人 ス グ ョ EKC は 当 ファ アイフル が 
一 杯 あっ て 同時 に 15 個 まで 使え る 様 に な 
っ て いて , 番号 も 15 ま で 使 ま す . そこ で , 
対応 づけ を し な けれ ば な ら な いわ け で す . 
それ で わざ わき 最初 に 宣言 し て 使う の で 
SjL 


大 野 : 
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田口 : 


飯田 


天野 : 


その 対応 づけ を 解く の が CLOSE な の 
3 ぐ で 議 

CLOSE し た ファ イル 番号 は , 又 他 の ファ 
イル に 対応 づけ し て 使う 事 が で きる わけ 
NGO 

ディ スク 上 に は ファ イル が 沢山 あっ て デ 
ィ ス ク と いう の は , 一 種 の カセ ッ ト の ラ 
イプ ブラ リー の 様 な 役目 を 果して いて , フ 
ァイル を OPEN する と いう 事 は , ライ 
プラ リー の 中 か ら 自 分 の 欲し い カ セッ ト 
を も っ て くる 事 と いう こと で す . 

そし て CLOSE と いう の は ライ ブラ リー 
の 中 に カセ ッ ト を 戻す 事 だ と 考え る こと 
の Sa さま 39.: 


ディ スク の 利用 範囲 


PC に ディ スク を つけ て 拡張 し た 人 や これ 
か ら , ディ スク を つけ て 拡張 し た いと 考 
を えて いる 人 の た め に , ディ スク の 利用 範 
囲 は どの 程度 な の で し ょ うか . 


: 信頼 性 に お いて は , あま り 高 いと は いえ 


ま を お あ の 5 ガ イス ク を 正しく 扱え る よう 
に な っ だ 人 に は , それ 相当 の 使い 方 が で 
きる と 思い ます . 

情報 処理 が 早い , 容量 が 大 きい な どの カ 
セッ トイ ンタ ー フ ェ イ ス を 使っ て いる と 
き と は , くら べ も の に な ら な い ほ ど デ ー 
タ を 処理 する 範囲 が 広く な り ま す . 
ディ スク だ け で ビジ ネス に 使 お うと 思う 
人 は , ディ スケ ッ ト の バッ クア ッ プ が 絶 
体 に 必要 で す . 

rermove を わす れ た り , その 他 の 悪 条件 が 
重なっ て ディ スケ ッ ト の デー タ が 壊れ る 
こと が あり ます . 

:・ ディス ク の 耐久 性 は どの くら いな の で し 
放電 の 2 の 3 

マニ ュ ア ル に は , 特に 時 間 的 寿命 は 記載 
され て お り ま せん が , まぁ, 設計 寿命 は 


飯田 


田口 


大 野 : 


コジ 


一 応 5 年 と 私 た ち は 考 えて いま す . 
使用 目的 , 用 途 , 環境 に よっ て , 多少 使 
用 可能 年 数 が 変わ る で し ょ う . 


・ 機械 部 で 寿命 は 決ま り ま すか ら , 部 分 的 


な 交換 で , 寿命 が 伸び る こと は 充分 考え 
られ る こと で す 、 


ディ レク トリ と は 何 か 


・ デ ィ ス ケッ ト の 話 に な り ま す が , ディ レ 


クト リ に つい て も 知り た い の で す が . 
先程 か ら 話 し て いる よう に ファ イル が デ 
ィ ス ケッ ト の 上 の どこ に ある か , ディ ス 
ケッ ト 中 に 一 体 ど うい う 種 類 の ファ イル 
が ある の か と いう 情報 も ディ スケ ッ ト 上 
に お いて お か な けれ ば な ら な い の で す . 
そう いう 情報 を 入れ て お く 場 所 が ディ レ 
クト リ で あり , FAT で ある わけ で す . 
ディ レク トリ は 台帳 と いう 意味 な ん で す 
けれ ど , ファ イル の 名 前 と 住所 が 書い て 
ある も の だ と 思っ て 頂け れ ば いい 訳 で す . 
つま り , ファ イル の 名 前 と その ファ イル 
の し まわ れ て いる ディ スケ ッ ト 上 の 位置 
を 保持 し て いる の が ディ レク トリ で す . 
実際 に は , ファ イル の 大 き さ に 応じ て フ 
ァイル の 占め る 領域 も 大 きく な る の で , 
ディ レク トリ に は , ファ イル の 先頭 の 部 
分 が 使用 し て いる セク タ の 位置 が 保持 さ 
れ て いて , 続く ファ イル の 内 容 が どこ に 
し まわ れ て いる か は FAT に 記録 され て 
いま す . 

だ の 小 う に 5G 革 2 レク 8 りり は 271 
ル の 名 前 と , ファ イル の 内 容 が 保持 され 
て いる 位置 と を 対応 づけ る と いう 役割 り 
を 果たし て いる わけ で す . 


14 モジ ュー ル 化 の 方 法 


田口 


鈴木 : 


鈴木 ・ 


: ディ スク に よっ て , 少々 長い プロ グラ ム 


で も 扱え る よう に な っ た , と し て も , あ 
まり 長い も の や ちょ っ と 復 雑 な プロ グラ 
ム は うま くい か な い 場 合 が ある と 思い ま 
す が , その 時 。 プ ログ ラム の チェ イン と 
いう 言葉 が あり ます が , 具体 的 に チェ イ 
ン と は どう いっ た 機能 な の で し ょ うか . 
2 つ 以 上 の プロ グラ ム を 連続 し て 走ら せ 
る 方 法 と し て , 二 つ の 方 法 が ある わけ で 
99 

1 つ は 2 つの プロ グラ ム を 最初 に 動か す 
前 に MERGE で 1 つの プロ グラ ム に 設 
(< 朋 ま 27 の 9 記 

MERGE の と ころ を 読ん で も ら え ば 良く 
わか る と 思い ます . 

MERGE を 使え ば , 当然 1 つの プロ グラ 
ム に な り ま すか ら , それ で OK で す . も 
う 1 つの 方 法 は , これ は 最後 の 手段 な ん 
で す が , メ モリ に 入り きら な か っ た 場合 , 
(1 本 の プロ グラ ム が 長 す ぎ て ) プロ グ 
ラム を 2 本 に 分 ける わけ で す . 


: 今度 は 1 本 の プロ グラ ム を 2 本 に 分 ける 


わけ で すね . 

1 本 の プロ グラ ム を 2 本 に 分 け て , 片方 
を 動か し て 処理 が 終わ っ た ら , その 時 点 
で ディ スク か ら 残 り の プロ グラ ム を ロー 
ド し て , ロー ド さ れ た ブロ グラ ム に 実行 
を 移す と いう 方 法 が ある わけ で す . 
その 時 に , 例え ば ファ イル を 使っ た と し 
ます . 

2 番目 の プロ グラ ム を ロー ド す る と き , 
通常 の RUN と する と ファ イル が CLOSE 
され て し まい ます . それ で は 困る の で , 
OPEN され て いる ファ イル を CLOSE し 
な いで , ファ イル は その まま 残し て 動か 
そう と いう 方 法 が ある の で す . 


田口 


鈴木 : 
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鈴木 ・ 


138 


この 方 法 が , RUN* フ ァイル 名 ?, R と , 
LOAD "ファ イル 名 *。 R です. 

この 方 法 は ディ スク が いか に 速い と は い 
々 大 変 時 間 の か か る わけ で , や ら な い ほ 
う が 無難 で し ょ う . 

run “ファ イル 名 /。r と load パフ ァイル 
名 ?,r は 機能 は 全く 同じ で , run は ロー 
ド し て あと の プロ グラ ム に run を か ける 
動作 な の で す . 

load & run を One Step で や っ て くれ る 
の で す . 

し か し , 一 方 の プロ グラ ム か ら 他 の プロ 
グラ ム を サブ ルー チン の よう に し て 呼び 
出す 事 は 出来 な い の で す . 


:・ サブ ルー チン と し て 呼び 出す こと は な ぜ 


で き な い の で すか . 

まっ た く 方 法 が な いわ け で は な い の で す 
が , 大 変 難 か し いこ と で すね . 

又 。、 プ ログ ラム を OPEN し た まま ,run 
や load を する と 変数 類 は すべ て クリ ヤ 
ー さ れ て し まい ます . 

で すか ら , 一 本 の プロ グラ ム と は いい 難 
いわ け で す . 


: 変数 類 が 全て クリ ヤー され て し まう の で 


すか ら , 後 で 自分 で 入れ 直さ な けれ ば な 
ら な い の で し ょ うか . 

クリ ア さ れる 変数 を 保存 する 手段 と し て 
全部 丸 ア イル に し で し まう こと が で きま 
39 記 


アク セス と は 何 か 


呈 紹 まで に 請 万 ク セス と いわ れる 言葉 が 


開か れ ま す が 具 体 的 に 説明 し て 下さ い . 


: アク セス と いう の は , 目的 と する デー タ 


を 読む と か 書く と か する 動作 で す .、 これ 
は 例 で 示し た 方 が よく わか り ま す . 

だ 衝 (は 二 許 28 で りり 2 あり ます 。 メ モリ に 
アド レス が 割り 振ら れ て いて , それ を 目 


大 野 : 


飯田 


E チ と し て メモ リ を 読む と いう 事 が アク セ 
レプ GWGAV の まこ と で す 。 

アク セス する た め に , アド レス と いう も 
の を 出し て それ に よっ て , 1 つの メモ リ 
が 選択 され て , 書く と いう 動作 を 総称 し 
て アク セス と いい ます . 

アク セス に ぴっ た りす る 使い 言葉 は な い 
か な . 


: 普通 呼び 出し と いっ て いる が . 
鈴木 : 


ディ スク に 対す る アク セス と か , メモ リ 
に 対す る アク セス と も いい ます ね . 今 の 
場合 は ディ スク だ か ら デ ィ ス ク の アク セ 
ス で すね . ディ スク 中 の デー タ は ファ イ 
ル 単 位 で すか ら , ファ イル を アク セス す 
る と いう 具合 に も よく 使い ます . 

そこ で , ディ スク 中 の ファ イル を アク セ 
ス す る 人 為 に どう いう 手段 が と られ る か と 
いう 話 に な る わけ で す . 

アク セス する と いう の は 1 つの 目的 と す 
る , 対象 物 が 当然 ある わけ で す . で すか 
ら デ ィ ス ク 中 に 沢山 ファ イル が 入っ て い 
れ ば , その うち の 1 個 が 対象 と な り ま す . 
対象 を 具体 的 に 読み 書き する 為 に , つま 
り ア クセ ス す る 人 為 に どう いう 手段 が と ら 
れる か と いう の が 1 章 , 7 章 に 書い て あ 
る の で す . 


16 MOUNT と REMOVE 


田口 


大 野 : 


・ ブ ログ ラム や デー タ を 打ち 終わ っ て , デ 


2 人 スク に SAVE し よう と 思い , は じ め て , 
ディ スク に 電源 が 入っ て いな か っ た と 気 
づい だ 場合 や Disk BASIC の 状態 に な 
っ て いな か っ た と き の 処 置 は どの よう に 
すれ ば 良い の で し ょ う ). 

そう いっ た 場合 に は , カセ ッ ト に 一 度 プ 
ログ ラム を CSAVE を 行なっ て 退避 し て 
か ら , 再び ロー ド し て ディ スク に SAVE 


飯田 : 


田口 : 


飯田 : 
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を 行なう 以外 に 手段 は あり ませ ん ね . 
ディ スク を 使い 慣れ て いな い 人 に お こり 
が ちな ミス で す . 
mount を する と き , ド ライ ブ 指 定 を し 
な いで , mount を する と し ます . ドラ イ 
プ 指 定 が な い ぃ の で , 両 方 ドラ イプ が mount 
され よう と し ます が , な ぜ ド ライ ブ 2 の 
方 か ら mount し よう と する の か , ドラ 
イプ 2 に ディ スケ ッ ト が 入っ て いな いと , 
どう な る の で し ょ うか . 
どう し て ドラ イプ 2 か ら マ ウン ト す る か 
解 か り ま せん . ディ スケ ッ ト が ドラ イブ 
に マウ ント され て いる か どう か は , 光学 
的 に 検出 で きる は ず な の で す が , 今 の と 
ころ その 検出 は 調べ て いま せん . し た が 
っ て ドラ イプ に ディ スケ ッ ト が 入っ て い 
な い 状 態 で マウ ント し よう と する と , た 
と えば , ドラ イプ 2 に ディ スケ ッ ト が 入 
っ て いな い に も か か わら ず ,mount( ド ラ 
イプ 指定 な し ) を 実行 し た りす る と , ぃ 
つま で も , ドラ イプ 2 の LED が 点 短 し 
た まま に な っ て , PC 本 体 に 制御 が 戻っ て 
きま せん . あま り , 勧め られ ませ ん が , 
この 状態 で 強引 に ディ スケ ッ ト を 入れ れ 
ば , マウ ント が 終了 し ます . 

の 場合 も 同じ 事 が 起き ほる の で 
し ま の が 5 
remove の 場合 は , mount され た ディ 
スケ ッ ト に 対し て , remove が 行なわ 
れる の で , 心配 は あり ませ ん . 
た だ し , 両 ド ライ プ を mount し て , 
remove を する 時 に , 何 か の 理由 で ド 
ライ ブ 2 か ら デ ィ ス ケッ ト を 抜い て し ま 
っ だ の で は ドラ イン 2 に アク 2 の 8 ント 
が 入っ て いる と PC 側が 判断 し て し まう の 
で , ドラ イブ 2 に ディ スケ ッ ト が 入る の 
を 待ち つづ ける 状態 に な り ま す . 
先ほど 説明 し た ,mount の 状態 と 同じ よ 


っ の 3 


大 野 : 


う な 結果 に な っ て し まう の で す . 

この よう な 初歩 的 な ミス を 行なわ な いよ 
US 間 237 有 516 Be ぐ 2021 2S の 
の 正しい 使い 方 を し っ か り 覚 える の が 賢 
明 で すね . 
remove に つい て , も う 1 つ 聞き た い 
の で す が )。 ディ スケ クッ ト に ライ トブ ロ テ 
クノ ッ チ を つけ た 場合 で は REMOVE で 
さ KZcVS の ) は 3 と 0) 有 [ 表 WGl 証 7 

前 に も 説明 が あっ た と 思い ます が 
REMOVE と いう の は , ディ スケ ッ ト に 
書き 込み や SAVE を 行なっ た の あと に , 
ディ スケ ッ ト の 管理 情報 を ディ スケ ッ ト 
に も どす 命令 な の で す . 

ライ ト プ ロ テク トノ ッ チ を つけ る と 書き 
込み が で き な く な り ま すか ら , この 情報 
も 書け な く な り REMOVE で き な い こと 
に な り ま す . し か し , この 管理 情報 は , 
ファ イル を 作っ た り , 削除 し た り し な け 
れ ば 変わ る こと が な い の で REMOVE す 
る こと が で き な く て も 全く 〈《 さ し つか える は 
な い の で す . 

この よう に ライ ト プ ロ テク ト さ れ て いる 
ディ スケ ッ ト は ,remove を せ ず に ドラ イ 
プ か ら 抜 き 取 っ て も か まわ な い の で す が , 
次 の ディ スケ ッ ト を 入れ て も MOUNT は 
で き な い こと に な り ま す . 前 の ディ スケ 
ッ ト を remove し て いな い の で Disk 
already mounted の エラ ー に な る か ら で 
す . こ こ て で 注意 し な けれ ば な ら な い の は , 
マウ ント され た 状態 に な っ て いる か ら と 
いっ て , さ し か え だ た ディ スケ ッ ト に 対し 
て remove を し て は な ら な いと いう こと 
で す ,。 この こと に つい て は 7 章 で も 触れ 
て いま す が , さ し 替 えて か ら remove を 
行なう と , 前 の ディ スケ ッ ト の 管理 情報 
が さ し 奉 えた ディ スケ ッ ト に 書き 込ま れ 
て し まい その ディ スケ ッ ト の ほん と う の 
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管 理 情報 が 破壊 され て し まい ます . 


17 フォ ー マ ッ ト と バッ クア ッ プ 


田口 : 


飯田 : 


次 に ディ スケ ッ ト に 行なう も の で す が , 
ディ スケ ッ ト に フォ ー マ ッ ト を か ける と 
いい ます が , か な ら ず , フォ ー マ ッ ティ 
ング は いる も の な の で し ょ うか . 

まだ た 紳 クック と セク タ の 話 に な っ て し 
まう の で す が , トラ ッ ク の 区 別 は ヘッ ド 
を 移動 する こと で 可能 で す . 問題 は セク 
タ は どう や っ て 区 別 す る の か に な り ま す . 
これ に は , 2 つの 区 別 の 仕方 が あり ます . 
バー ニ ド セ クタ と ソフ ト セ クタ の 2 つ に 分 
けら れる の で す . 

ハー ド セ ク タ と 呼ば れる の は , その セク 
タ が ある と ころ に , イン デック ス ホ ー ル 
と 呼ば れる 穴 を それ ぞ れ 開け て お く の で 
す . 

た と える ば, 16 個 の セク タ が あっ た ら 16 個 
を 中 心 に 穴 を 開け て お く の で す . 

その 究 を 光学 的 に 検出 し た と き に その セ 
クタ の 始ま り だ と 判断 で きる の で す . そ 
れ に 対し て ソフ ト セ クタ と いう の は , イ 
区 グッ ググ 愉 ボ 王 み ルレ とい 5 の は ま 1 つ だ け 
MG9 記 

そこ か ら 第 1 の セク タ が 始ま る と 考え て 
く 〈《 く ださい. 

それ か ら 後 の セク タ の 区 切 と し て 特殊 な 
マー ク を つけ て お 〈 く の で す . 

ここ が セク タ の 始ま り だ よ と 印 を 付け て 
お く 〈 く の で す . 

それ は , 他 の 重要 な デー タ と 混ざら な い 
よう に , 特殊 な ビッ ト パ タ ー ン を 入れ て 
ある の が 普通 で す . 

現在 の と ころ , ミニ フロ ッ ピ ー は 規格 の 
統一 が うま く な され て いま せん の で , 市 
販 の ディ スケ ッ ト を その まま 使用 で きる 
と は か ぎり ませ ん の で , PC の ドラ イブ に 


大 野 


飯田 


田口 : 


飯田 ・ 


合う よう に , 前 に 述べ た , 特殊 な ビッ ト 
パパ ター ン を 書き 込む 必要 が あり ます . 
それ が まず 最初 の 第 1 段階 の フォ ー マ ッ 
較 ( 選 2 が ま りす. 

セク タ の 始ま り の 部 分 に は ,、 トラ ッ ク 番 
号 と セク タ 番 号 と が 書き 込ま れ ま す . こ 
の こと に よっ て , 何ら か の ノイ ズ で ヘッ 
ド が 誤 ま っ て 移動 し て し まっ た 場合 で も 
その エラ ー を 検出 する こと が で きる の で 
09 

よう する に ,「 ぼ く は , 何 ト ラッ ク の 何 セ 
クタ で す .」 と ディ スケ ッ ト に 自選 主張 さ 
せる の で す . 


・ PC の ドラ イブ で 使用 可能 に する に は , さ 


ら に FAT や ID フィ ルー ド や ディ レク 
トリ ー を 初期 化す る 必要 が あり ます . 
0 の 2Z ォ ーー マッ ト の だ いた い の 内 容 で 
す . 

ディ スク の バッ クア ッ プ は フォ ー マ ッ ト 
の 次 に 大 事 な こ と だ と 思う の で す が . 

パ バックアップ と いう の は , ディ スケ ッ ト 
中 の = グ の コピ ー の こと で , ディ スケ 
ッ ト の 良い 所 か ら 悪 いじ 所 まで の 全て を コ 
| 関 | 伺 まう と いう ご と で す 、。 デイ ス 
ケッ ト 中 の ファ イル が 壊れ る こと が た ま 
に あり ます の で , ファ イル の コピ ー を し 
て お け ば その 和 被害 を 最小 限 に 食い 止め る 
ら SGSOgel 開 選 
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フロ ッ ピ ピー ディスク は , 1973 年 IBM3740 デ 
ー タ エン トリ シス テム に お いて , 紙テープ や パ 
ンチ カー ド に 代わ る 新しい 入力 媒体 と し て 登場 
し まし た . フロ ッ ピ ー デ ィ ス ク は , 従来 の 紙 製 
媒体 に な い 特 徴 を 持っ て いま す . デー タ 容 量 あ 
たり の 体積 と 重量 が 小さ く , 反復 使用 する と 結 
局 放 くつ く の で す . これ ら は , カセ ッ ト テ ー プ 
に も あて は まる こと で す が , 大 き な 違 い は , ラ 
シタ ク パ シク 4 セス 本能 で ある こと で す 。 これ に よ 
っ て 必要 は 情報 が すぐ に 取り 出せ る の で 大 幅 に 
処理 時 間 が 短 緒 きれ まし た . 

この よう に , 入力 媒体 と し て 登場 し た フロ ッ 
ピー ディ スク で す が , その 小形 軽量 の 割 に 大 容 
量 ラン ダム アク セス 可能 と いう 特徴 か ら , し 
だ い に マ イク ロコ ンピュータ の 補助 記憶 と し て 
和 注目 され て きま し た . そん な 中 で , 1976 年 シュ 
二 カ ー ト 社 が 。 ミニ フロ ッ ピ ー デ ィ ス ク を 発表 
し た の で す .。 ミニ フロ ッ ピ ー デ ヂ ディス ク は , 前 の 
標準 ラウ ロッ ピー ディ スク より , ずっ と 小さ ぃ の 


さこ 


1 4 紀 


ディ スク の パー ドウ ツェ ア 


で 取扱 い が さ ら に 手軽 に な り ま し た . 大 き さ が 
小さ く な っ た の で , 当然 容量 も 小さ く な り ま す . 
標準 フロ ッ ピ ー デ ィ ス ク の 容量 は 約 400K, ミニ 
フロ ッ ピ ー デ ィ ス ク の 容量 は 約 110k で す . フロ 
ッ ピ ー デ ィ ス ク の も う 一 つの 進歩 は , 倍 密 度 化 
で す . 従来 の 単 密度 に 比べ て , 倍 密 度 に よる 記 
録 方 法 で は , 容量 が 2 倍 に な り ま す . し た が っ 
て , 標準 フロ ッ ピ ー デ ィ ス ク で 約 800k, ミニ フ 
ロッ ピー ディ スク で 約 220k の 容量 に な る わけ で 
す . レコ ー ド に 表 と 裏 が ある よう に , フロ ッ ピ 
ー デ ィ ス ク の 裏表 を 使う こと も 可能 で す . この 
よう に する と , さら に 2 倍 の 容量 に な る わけ で 
す . こう し て , 今日 で は 両面 倍 密度 が 主流 に な 
りつ つ あ り ま す . 記録 方 式 , 磁性 面 の 改良 に よ 
っ て 今後 さら に 窒 量 が 増す こと も 考え られ , コ 
スト も , 磁気 バブ プル, カー トリ ッ ジ テー プ よ り 
も , ずっ と 安い の で , 増 々 普及 する も の と 考え 
られ ます . 


こさ 


図 標準 ヂ ディス ケッ ト と ミニ ディ スケ ッ ト 


と ハバ と / ヽ 


8.00 イ ンチ (20.24cm) 5.24 イ ンチ (13cm) 


表 フロ ッ ピ ー デ ィ ス ク の 種類 
標準 (8.00X8.00 イ ンチ ) 


大 きき る ミニ (5.24X5.24 イ ンチ ) 
pr Pe 
ツウ 
セク タダ 割 ン 
面 利 用 な 
6.。 1 フロ ッ ピ ー デ ィ ス ク の 構造 


ラノ ウ IE< 王 ジン ン ( と 0 ク (Eg グー ルイ グ く 多 
本 体 と ジャ ケッ ト か ら 構 成 さ れ て いま す . フロ 
ッ ピ ー デ ィ ス ク 本 体 は 。 ドー ナツ 型 の ベー ス に 
磁性 体 を 塗っ た も の で , この 表面 に 情報 が 記録 
され て いま す . 中 央 の 穴 は , スピ ンド ル 孔 と 呼 
4 れ 還 に ジョ ン ム 8 スラ に 3 ド 9 の ll28 の に 二 2 交 1 
スク 本 体 を 回 転 き せる た め の 軸 が 中 に 入り ます . 

この 究 に よっ て ディ スク の 中 心 , さら に トラ 
ッ ク の 位置 を 決め て いる わけ で すか ら , 古く な 
っ て 究 の 縁 が よれ よれ に な る と , エラ ー が 発生 
し や すぐ 《 なり ます .。 ディ イス ケッ ト が 正しく 入っ 
て いな い の に 強引 に ふた を 閉め よう と し て も , 
この 究 を 傷め る の で 注意 し て くだ さい . ディ ス 
ケッ ト 本 体 は その 他 に , 小さ な 穴 が , 大 き な 究 
の 少し 外側 に あい て いま す . この 容 は イン デ ッ 


クス ホー ル と 呼ば れ , 円 周 方 向 の 位置 (後述 す 
る セク タ の こと ) を 決定 する の に 使い ます . 
ジャ ケッ ト は 本 体 よ り 少 し 大 きめ の プラ スチ 
ッ ク 製 の 入れ 物 で , 同じ よう に 2 つの 究 が あい 
て いま す . その 他 に 磁性 体面 に ヘッ ド を 接触 す 
る た め に , ヘッ ドア クセ ス 孔 と 呼ば れる 細長 い 
穫 が あい て いま す . この よう に する こと に よっ 
て , ディ スク 本 体 の 赴 出 を 必要 最小 限 に し て い 
る わけ で す . ジ ャ ケッ ト の 内 側 に は , 不織布 が は 
っ て あっ て , ジャ ケッ ト と 磁性 面 が 直接 接触 す 
る の を 防い て いま す . この 不織布 に よっ て 外部 
か ら の 汚染 に よる 損傷 や 静電気 に よる デー タロ 
ス か ら フ ロッ ピー ディ スク 本 体 を 保護 し て いま 
す . 外 か ら は ゴミ が 入り に くい か わり に , 一 度 , 
中 に ゴミ が 入る と な か な か 外 に は 出 て きま せん . 
こう な っ た ら , い くら 後 で て いね い に 使 っ て も , 
ドラ イブ に か ける た びに キズ を 付け て , 最悪 の 
場合 は ヘッ ド を 破壊 し て し まい ます . ジャ ケッ 
ト に は , 一 部 分 切り こみ が あり ます が , これ は 
ライ ト プ ロ テク トノ ッ チ と 呼ば れる も の で , 後 
述 す る フロ ッッ ピー ディス ク ド ラ イブ の , ライ ト 
プロ テク トス イッ チ る を 動作 し ます . こ の 働き は , 
カセ ッ ト テ ー プ な ど と は 逆 で , 何 も 付 いて いな 
い 状 態 が 書き 込み 可能 , ここ を シー ル で ふさ ぐ 
と 書き 込み 禁止 と な り ま す . ジャ ケッ ト に は , 
2 つの ラベ ル が 張っ て あり ます . この 2 つの ラ 
ベル の 使い 方 は , PC-8031 の ユー ザー ズ マ ニュ ア 
ル に 詳し 〈 載 っ て いる の で そちら を 見 て くだ さ 
い . 

デー タ が 記録 され る の は , ラベ ル の 反対 側 の 
面 で す . この 面 は と くに 大 切 に し て くだ さい . 
ドラ イプ か ら 出 し て いる と き は か な ら ず 付属 の 
保護 封筒 に 入れ て お いて 〈 く ださい. もちろん, 
ディ スク 使用 中 は 保護 封筒 に ゴミ な ど が 入ら な 
いよ うに 注意 し て くだ さい . PC-8031 の フロ ッ ピ 
ー デ ヂ ディス ケッ ト 「 取 り 扱 い 上 の 注意 事項 」 は 必 
ず 読 ん で くだ さい . こう いう と , か な り 扱 い に 
くい よう で す が , 普通 の 使い 方 を し て いれ ば 十 


1 コス 


分 信頼 性 が あり ます . 
フイ ト プ ロ テス クノ ッ チ の 使い 方 


ライ ト プ ロ テク トノ ッ チ の 使い 方 
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午 き 込み 可能 書き 込み 禁止 


ンク 
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て 
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6 た 語 『2 細 状 Ri ムッ ク と セク タ 

フロ ッ ピ ー デ ィ ス ク の 磁性 面 は , 半径 方 向 に 
35 本 に 分 割 き され て いて , これ を トラ ッ ク と 呼び 
ます . さら に トラ ッ ク は , 16 個 の セク タ に 分 け 
られ て いま す . し た が っ て , 1 枚 の ディ スク 上 
に は , 16X35 三 560 個 の セク タ が 存在 する こと に 
290 り ま 69 東 証 必 だ が つ で デイ スク 上 の セク タ の 
場所 は , トラ ッ ク 番 号 と ,。 その トラ ッ ク の 何 番 
目 の セ クタ か を 表わす . セク タ 番 号 に よっ て 示 
され ます . この 2 つの 番号 は , ちょ ぅ ) ど ディ ス 


ク 上 の 番地 の よう な も の で , アク セス が 効率 良 
《 行 な を る よう に な っ て いま す . ある い は , デ 
ィ ス ク を 16X35 の 配列 と 考え て も よい で し ょ う . 
1 個 の セク タ に は , 256 バ イト の 情報 が 入り ます 
か ら , 1 枚 の ディ スク 上 に は , 256 xX560=14336 
バイ ト す な わ ち 約 143K バ イト の 情報 が 入り ます . 
ド クン ンコ に コレ ルル / 


図 


図 ソフ ト セ クタ 


ツウ 0 ドック 。 多 


ハー ド セ ク タ 


3 テーSA ウ テロ ング 4 

トラ ッ ク 指 定 は , 後に 述べ る よう に , ステ ッ 
ピン グモ ー タ (パル ス に よっ て , 正確 に 一 定 角 
度 回 転 す る , 特殊 な モータ) に よっ て , ハー ド 
的 に 行なわ れ ま す . も ちろ ん , 35 個 の トラ ッ ク 
を 縦 に ズラ リ と 並べ れ ば よい の で す が , これ で 
は た い へ ん 高価 に な っ て し まい ます の で , 1 個 
の ヘッ ド を セッ セ と 移動 し て 使う わけ で す . そ 
れ に 対し て , セク タ の 指定 は , ディ スク が 回 転 
し て いる の で , そう 簡単 で は あり ませ ん . トラ 
ッ ク を セク タ に 分 割 する 方 法 と し て は , ソリ Ni 
セク タダ 方 式 と ハー ド セ ク タダ 方 式 の 2 種類 が あり 
ます . ソフ ト セ クタ 方式 と いう の は 。 セク 久 の 
切れ 目 に 特殊 な ビッ トバ パタ ー ン を 書き 込ん で お 
いて , 実際 に その パタ ー ン を ヘッ ド て 読む こと 
に よっ て , セク タ の 位置 を 検出 する 方 式 で す . 
これ に 対し て , ハー ド セ ク タダ タ 方式 と いう の は , 
ディ スク 上 に セク タホ ー ル と 呼ば れる 小穴 を 必 
要 な だ け あ け て お いて , この 小穴 に より , セク 
タ の 位置 を 光学 的 に 検出 する 方 式 で す . し か し , 
特殊 な 用 途 に し か 用 いら れ て いま せん . 
PC-8031 で は , ソフ ト セ クタ 方 式 を 用 いて いま 
す . 前 に 述べ た よう に , ソフ ト セ クタ 方 式 で は , 
特殊 な ビッ トペ パタ ー ン を , あら か じ め デ ヂ ディスク 
上 に 書き 込ん で お か な けれ ば な り ま せん . この 
作業 の こと を , フォ ー マ ッ テン グ と 呼び ます . 
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フォ ー マ ッ テン グ は , イン デック ス ホ ニ ル を 基 
準 に 行なわ れ ま す 。 フォ ー マ ッ ティ ング に よ 
っ て , それ ぞ れ の セク タ に は , ID フィ ー ル ド と 
呼ば れる 部 分 と デー タフ ィ ー ル ド と 呼ば れる 部 
分 に よっ て 構成 され ます . GAP と いう の は , 同 
期 を 取る た め の マ ー ク で , カ セッ トイ ンタ ー フ ェ 
イス の あの ピー と いう ) 音 に 対応 し て いま す . 
較 還 2 の 2 ニク 7 ョ シン 4 
ディ スク の フォ ー マ ッ ティ ング 

回 転 方 向 


1 セクタ 分 次 の セク タ 


セー ルト 用 ク フィールド 


1 D を 表わす マー ク デー タフ ィ ー ル ド を 表わす マー ク と 


トラ ッ ク 番 号 2 5 6 バイ ト の デー タ 

セク タ 番 号 お よび , その C R C チ ェ ッ ク が 入 
お よび , その CRC っ て いる 

ED クン 。 


移 pmeeep 


ID フィ ー ル ド は , ID フィ ー ル ド を 表わす マー 
ク , トラ ッ ク 番 号 , セク タ 番 号 , 及び それ ら の 
CRC チ ェ ッ ク が 書か れ て いま す . CRC チ ェ ッ ク 
と は サム チェ ッ ク と 同類 の も の で , その デー タ 
に 誤り が な いか 調べ る た め の 余分 な デー タ で す . 
この ID フィ ニル ド を 読む こと に よう で て 。 今 。 
ッ ド が , ディ スク 上 の どの 部 分 を 読ん で いる か 
を , 知る こと が で きる の で す ,。 デー タフ ィ ー ル 
ド に は , デー タフ ィ ー ル ド を 表わす マー ク , 256 
バイ ト の デー タ 本 体 , 及 びそ れ ら の CRC チ ェ ッ 
ク つ まり 。 次 に 来る デー タフ ィ ー ル ド は 読ま な 
けれ ば な ら な い の か , それ と も 無視 する の か 判 
断 で きる わけ で す . 

ユー ザー が デー タ を 書き 込む と き は ,。 こ の デ 
ー タ フィ ー ル ド の み 書 き 変 えて , ID フィ ー ル ド 
は 書き 変え ませ ん . 

以上 の よう に , GAP と 2 種類 の フィ ー ル ド を 
書き 込む 手続 き を が .。 マニ ュ ア ル に 書い て ある フ 
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ォ ー マ ッ テ ン グ の STEP 1 に 相当 する も の で , 
format ステ ー ト メン ト に よっ て 行い ます . 市 販 
され て いる ディ スケ ッ ト は , その まま で は PC-8031 
で 読め みな いこ と が あり ます . それ は , 市 販 品 の 
フォ ー マ ッ テン グ の 形式 が , PC-8031 の 形式 と 合 
わな いた めで す 。 フ ォ ー マ ッ ト す る こと に よっ 
て PC-8031 に よっ て , 読み 書き が で きる よう に な 
り ます . た だ し , format ステ ー ト メン ト は , DSKC$ 
ステ ニー トメ ント と 並ぶ 。 芝 ろ し い ス テー トメ ン 
ト ですから, 使う と き に は くれ ぐれ も 気 を 付け 
(<W7SKIVO 

し か し , この まま で は Disk BASIC の 通常 の 
ニッ ンド 6 議 多 7a 二 NN は 使用 する こと が で 
きま せん , それ は , Disk BASIC が ,。 フ ァイル 
を 管理 する た め の 情 報 , すなわち , FAT, ディ 
レク トリ , ID の 初期 化 を 行なっ て いな いか ら で 
す 

これ ら も 含め て , すべ て 自動 的 に 行なっ て < く 
れる の が , 付属 の , format ユー チ ティ リティ ブロ 
ジグ ジル JAYG で 大 


PC-8031 の 構成 


RAM 
16Kbyte 


バッ ファ 用 の メモ リ 


コン トロ ー ル プロ グラ ム 
が 入っ て いる . 


PC-8032 


Disk BASIC で , 新しく 登場 し た コマ ンド や 
スズ ステー トメ ント に つい て は 4 章 ま で で 説明 し ま 
し た . 本 章 で は , ファ イル の 編成 と その 管理 を 
理解 する こと に より , 各 コ マン ド や ステ ー ト メ 
ント が 具体 的 に どの よう な 働き を する か を 考え 
で の の ご (だ Il 馬 天 鹿 あ 所 


7. 1 ファ イル 構造 の 実現 


6 聞 で フロ ッ ピ ー デ ィ ス ク 装 置 に つい て 説明 
( 胃 ま | の: で 還 ま ず こ こと で は ディ スケ ッ ト 中 
で file を 構成 する に は どう すれ ば 良い か を 考え 
る こと か ら 始 め ま し ょ う . し ば らく の 間 , シー 
ケン シャ ルフ ァイル に つい て の み 考 える こと に 
! 壮 ま 83 記 


シー ケン シャ ルフ ァイル の 特長 は , いか な る 
時 で も , 直ちに アク セス 可能 な 成分 が 特定 の 1 
つの も の だ け で ある と いう こと で し た . フロ ッ 
ピー ディ スク は アク セス の 可能 な 単位 が セク タ 


7 ファ イル の 応用 


で し た か ら , 1 つの 成分 が 1 モ セクタ で あり , い 
くつ か の セク タ が ディ スク 上 に 列 状 に な らん で 
いる と みな せ ば , テー プ と 同様 ディ スク が シー 
ケン シャ ルフ ァイル の 構造 を 持っ て いる と , 考 
えら れる こと に な り ま す . 列 の 順番 づけ の 1 番 
簡単 な 方 法 と し て は , トラ ッ ク の 番号 の 小さ い 


順 , 同一 トラ ッ ク 内 で は セク タ の 番号 の 小さ い 
順に , ファ イル の 領域 を 取る こと で 達成 され ま 
す . た と えば , 今 プ ラン ク デ ィ ス ケッ ト が あっ 
て , 長き が 1024 バ イト の ファ イル を 作ろ うと す 
の 


る な ら ば , トラ ッ ク 0 の セク タク 1, 3, 4 


1024byte の 
ファ イル 


1 イフ 


を この 順番 で 割り 当てれ ば よい の で す . 


さて , この 構造 の まま で は , 2 つの 問題 が あ 
り ま 69 


1. ア クセ ス で きる 成分 が 256 バ イト 単位 で あ 
る . 

2 . フ ァイル の 長 さ は 256 の 整数 倍 で な けれ ば 
な ら な い 、. 


1 の 問題 は フロッピー ディスク が 1 セク タ 
単位 で の アク セス し か で きず , その 構成 要素 で 
ある 1 バイ ト , 1 バイ ト に は 直接 アク セス で き 
な いと いう こと が 原因 で す . し た が っ て , 1 セ 
クタ 分 の 内 容 を メモ リ に 移し て , その メモ リ 領 
域内 で アク セス を 行なう こと に よっ て , 1 バイ 
ト ご と の アク セス が 実現 され ます . この た め の 
メモ リ 領 域 を バッ ファ と 呼び , BASIC と , ディ 
スク と の デー タ の や り と り は 全て バッ ファ を 介 
し て 行なわ れ ま す . 

バッ ファ メモ リ 
disk 


タ 


セク タ (256 byte) 
単位 で の アク セス 
し か で き な い . 


sa の 55) ( 選 じ Y 間 38 多 | 愉 の 22 ニク (SA 
も その デー タ の 入っ て いる 順に 番号 を 0 か ら 255 
まで あぁ ふる こと に より 順序 づけ が で き , シー ケン 
シャ ルフ ァイル の アク セス で きる 単位 を 1 バイ 
ト と みな すこ と が で きま す . 

第 2 の 問題 は 。 バッ ファ の 導入 に より 自然 と 
回 避 さ きれ ます . し か し な が ら , ディ スク の 上 で 
は , 常に 256 の 整数 倍 の 領域 を 取る こと に な っ て 
し まい ます . 例え ば , 1025 バ イト の 長 さ の ファ 
イル が あっ た と し まし ょ う . 1 セク タ は 256 バ イ 


1 2 日 


NiG3i が りら 
1025ー256=4 余り 1 
つま り , 4 セク タ で は , 1 バイト 分 の 容量 が 


足り ない の で , 5 セク タ が 必要 に な る わけ で す . 
5 セク タ 目 の 256 バ イト の うち の 最初 の 1 バイ ト 
は , こう し て 使わ れ ま す が , 残り の 255 バ イト は , 
実際 に は 使っ て な く て も , 使っ た こと に な っ て 
し まい ます . この こと は , 大 変 重要 な 事実 で す . 
つま り , デイ スク の 容量 が 何 10K バイ ト も ある 
と 言っ て も , 実際 に は その 全て を 有効 に 使え る 
と は 限ら な い の で す . 明らか に , 窒 量 を 最も 有 
効 に 使う の は , ファ イル の 長 さ が , 256 の 整数 倍 
の 時 で す . し か し な が ら , 実際 に は , PC で は デ 
ィ ス ケッ ト の 記憶 領 寺 を きら に クラ スタ と いう 
単位 で 管理 し て いる た め に , 2KK バイ トー2048 
バイ ト の 整数 倍 で な いと 完全 に 有効 に は 使え ま 
せん , この こと に つい て は ,。 後 で も う 一 廣 述 べ 
まき 9 誠 


さて , 話 を 進め まし ょ う . 先ほど の ファ イル 
の 領域 の と り 方 は ファ イル が 論理 的 に 連続 し 
た も の で ある か ら , 領域 も 物理 的 に 連続 し た 領 
域 (つま り 互 い に 隣 接し た セク タ ) に 取 ろ うと 
いう も の で し た . この まま の 方 法 で は , 複数 の 
ファ イル が ある 時 に は , 領域 の 使用 効率 の 点 で 
問題 が 生ずる こと が あり ます . 例え ば , 図 7-3 
a の よう に 大 き さ が それ ぞ れ , m, n の 2 つの フ 
ァイル AB が あっ た と し まし ょ う . ファ イル 
A が 不要 に な っ て , 大 き さ が m の ファ イル C 
を 代わ り に し まう と する と , m' ミ m の 場合 に は 
図 陸 3Bi の 本 MG 還 6 る る | 四 ま あこ と が で き 
ます が , m>m の 場合 に は , ファ イル C に 対し 
て , A の あっ た 場所 を 割り 当て る こと は で きま せ 
2 る の だ の に 2 でも, 図 7-3 じ の よう に 
割り 当て ざる を えま せん . つま り , 不要 に な っ 
た A の 領域 を 使え を な い の で す . 


ーー 
Ci 


B 


リー 


生 きき | 
7-3a 7-3b 7-3c 7-3c' 


この 問題 は , 領域 を 図 7-3 じ の よう に 2 つ に 
分 け て と れ ば 解決 で きま す . つま り , 物理 的 に 
は , 連続 で な い 領域 を , 論理 的 に は 連続 し て い 
る と みな すこ と が で きる よう な 工夫 が 必要 と な 
り ま す . そこ で , ファ イル を , セク タ の 連結 で 
表現 する 方 法 を 考え て .。 シー ケン シャ ル な アク 
セス は , この 連結 の 情報 を 参照 し て , 次 の 成分 
(セク タ ) の 位置 を みつ け て 行なう こと を 考え 
くみ まし ょ う . 図 7-3a で A, B, C の 各 フ ァ 
イル の 大 き さ が , セク タ 数 に し て それ ぞ れ 4, 
5, 6 で あっ た と する と , 各 フ ァイル の 領域 の 
連結 の 情報 は 次 の よう に な る で し ょ う . 


コー ミー ヨミ 


に ーー 


A B 

(0 0 一 5 

0 一 2 0 一 6 

0 一 3 0 一"7 

0 一 4 0 一 8 

/ 0 一 9 
トラ ッ ク の 


番号 セク タ の 番号 


図 7 - 3 で C で は 不要 に な っ た A の 領域 が C に 
よっ て 使わ れる た め に C の 情報 は 次 の よう に な 
7) 3SS 記 


この よう に , 連結 の 情報 を 導入 する こと に よ 
り , 物理 的 に は 連続 し て な い ト ラッ ク , セク タ 
の 情報 で あっ て も , 論理 的 に は 1 つの 連続 し た 
ファ イル 中 の 情報 で も ある と みな すこ と が で きる 
よう に な る の で す . 


7. 2 ファ イル の 管理 


7. 1 節 で は , ファ イル の 実現 法 を 考え まし た 
が , その 際 に 付随 し て 必要 と な る 問題 が 2 つ あ 
り ます. 

1. ディ スケ ッ ト の 記憶 領域 の 使用 管理 を ど 

の よう に し て 行なう か ? 
2. 各 フ ァイル の 識別 を 行なう に は どの よう 
に すれ ば よい か ? 


1 の 問題 は デイ スケ ッ ト の どこ を すでに 使用 
し て いて , どこ を まだ 使用 し て いな いか を 知る 
た め に 基 非 と も 必要 な 事柄 で す . 2 は, ファ イ 
ル の 名 前 に よる 識別 を デイ スケ ッ ト 上 で どの よ 
うに 実現 する か と いう 問題 で す . ここ で は この 
2 つの 問題 に つい て 考え て み ま し ょ う . 


7. 2. 1 デイ スケ ッ ト の 記憶 領域 の 管理 

7. 1 節 で 考え た よう に , ファ イル の 生成 に 伴 

な う 領 域 の 割当 て と , 消去 に 伴 な う 使 用 し て い 
た 領域 の 解放 を 実際 に 行なう に は どの よう に す 
れ ば 良い で し ょ うか . 各 セ クタ の 状態 に は 使用 
され て いる , 使用 され て いな い の 2 つが ある こ 
と は すぐ に わか り ま す . ファ イル の 生成 と , 消 


使用 され て いな い 


使用 され て いる 
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去 を 行なう 場合 に この 状態 の 林 移 が 起こ る こと 
は 明らか で す . この よう に , 各 セ クタ の 状態 が 
2 つ で ある の で , この 情報 は 1 ビッ ト で 表現 す 
る こと が で きま す . 使用 きれ て いな い 状 態 を 0 
で 表わし , 使用 きれ て いる 状態 を 1 で あら わす 
と する と , ファ イル を 作る と き に 0 か ら 1 に , 
消去 する 時 に 1 か ら 0 に 変え れ ば 良い こと に な 
り ま す . 1 ビッ ト で 1 セク タ の 使用 状態 を 表 わ 
すこ と に する と, 1 枚 の ディ スク に は 35 個 の ト 
ラッ ク が あり , 各 ト ラッ ク に は 16 の セク タ が あ 
り ま すか ら , 16X35=560 bit=70byte の 情報 が 
必要 と な り ま す . この よう に し て , 領域 の 使用 
状況 を 表現 する 方 法 を bit-map 型式 と 呼び ます . 
この 方 法 に よれ ば , ファ イル を 生成 する 際 に ど 
この トラ ッ ク , セク タ を 割り 当て れ ば 良い か も 
容易 に 求め る あこ と が で きる よう に な り ま す . す 
な わ ち , bit-map を 最初 か ら 調 べ て いき , 最初 
に 出会っ た 0 で あっ た ビッ ト を 1 に 変え て , そ 
の bit が 何 番目 の bit で ある か 数 を, トラ ッ ク , 
セク タ の 番号 を 求め あれ ば 良い わけ で す . ビッ ト 
番号 を N,。 トラ ッ ク , セク タ の 番号 を TS と 
すれ ば , T, S は 次 の よう に し て 求め られ る で し 
99 
=N div 16 S=(N mod 16) +1 

ここ で , div は 整数 除算 を 表わす 演算 子 で PC の 
BASIC で 使う ぞ と 同じ で す . mod は 剰余 を 求 
め る 演算 子 で す . 例え ば , N が 19 で あっ た な ら 
ぽ ば トラ ッ ク 1 の セク タ 3 を 使え 々 ば よい こと に な 
る わけ で す . (た だ し N は 0 か ら 数 え 始 め る ) 
送 に ファ イル を 消去 する 際 に は , 連結 の 情報 
か ら , その ファ イル の 使用 し て いる T と S を 
求め 16* 芽 填 S の 式 で 求め た N 番目 の ビ 
ッ ト を 1 か ら 0 に 変え て や る こと に より , ファ 
イル の 消去 が 実現 され ます . フ ァイル の 消去 は , 
その 使用 し て いた 領域 を 解放 する だ け で , その 
ファ イル の 保持 し て いた デー タ 自 身 は 実際 に は 
残っ て いる こと に 注意 し て 下さ い . 7. 2. 2 節 で 
述べ る よう に , ファ イル の 名 前 を 消去 する こと 


に より , その ファ イル の アク セス が 不可 能 に な 
る の で デー タ そ の も の は , 残し て お いて も か ま 
わな い の で す . デー タ は , その 領域 が 解放 され , 
他 の ファ イル の た め に 使わ れる こと より , 書き 
込み が 行なわ れ た 時 に , 初め て , 破壊 され る こ 
と に な り ま す . 


7. 2. 2 ファ イル の 名 前 と その 管理 


7. 1 節 で ファ イル 構造 の 実現 方 法 。7. 2. 1 節 
で その 使用 領域 の 管理 方 法 を 考え て み ま し た . 
ここ で は , BASIC が 行なう よう に ファ イル を 名 
前 で 参照 する に は どの よう に すれ ば 良い か を 考 
X 識 1lz つ の が 去 ZS 才 ま じ よ う 。 (ここ で 考え る 
方 法 は 。 1 つの 実現 方 法 で あぁ っ て , PC の DISK 
BASIC で 使わ れ て いる 方 法 で は あり ませ ん . PC 
で 行なっ て いる 方 法 に つい て は 7. 3 節 で 述べ ま 
す .) 

7. 1 節 で 考え た よう に , ファ イル は その 構成 
要素 で ある セク タ の 連結 で 表現 きれ ます . し た 
が っ て , ファ イル を 名 前 で 参照 で きる よう に す 
る に は , 名 前 と 連結 の 情報 と を 結び つけ て や れ 
ば 良い こと に な り ま す .ABC と いう 名 前 の ファ 
イル で 長 さ が n セク タ を 必要 と する も の が あっ 
た と する と , 図 7. 2- 1 の よう に 表わす こと が で 
きる で し ょ う . ファ イル の 名 前 に よっ て , その 
連結 の 情報 を 参照 し , さら に その 情報 に よっ て , 
ファ イル の デー タ が どの トラ ッ ク セ クタ に ある 


トラ ッ ク 番 号 セク タ 番 号 
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か を 知る わけ で す . この よう に , ファ イル を 構 
成す る 情報 に は 3 種類 の も の が ある わけ で す が 
これ ら の 情報 は 。 い ずれ も ディ スケ ッ ト 上 に 
培 さ きれ て いる 必要 が あり ます . 実際 に デー タ を 
保持 し て いる セク タ を , Data block. 連結 の 情 
報 を 保持 し て いる セク タ を map block と 呼び 
ます . 一 方 , ファ イル の 名 前 は 複数 の ファ イル 
が 存在 する 場合 に 識別 する 手段 と し て 用 いる も 
の で すか ら , 存在 する 全て の ファ イル の 名 前 を 
表 に し て お く の が 便利 で す . この た め の 領 域 を 
ディ レク トリ (directory) と 呼び ます . ディ レ 
クト リ に は , ファ イル の 名 前 と と も に , その フ 
ァイル の 使用 し て いる 領域 を 知る た め に , map 
block の ある トラ ッ ク と セク タ の 番号 も 入れ て 


Data Block 


map-Block 


1 ディ レク トリ の 中 か ら , 参照 し よう と 
する ファ イル の 名 前 を 探す . 

の 。 ファ イル の 名 前 が 見 つか っ た ら , 名 前 
と いっ し ょ に 記録 さき れ て ぃ る , map block 
の 所 在 地 (トラ ッ ク と セク タ の 番号 ) を み 
て , その セク タ の 情報 (連結 の 情報 ) を 読 
みみ 込む 

3、 読み 込ん だ 連結 の 情報 を 参照 し て 実際 
の デー タ の ある 場所 (Data block の 位置 ) 
を 調べ デー タ に 対し て アク セス する . 


この よう に , ディ レク トリ は , 台帳 と いう 意 
味 が 示す よう に , ファ イル の 名 前 と その 所 存 地 


に 関す る 情報 を 保持 し て いる の で すか ら , ディ 
レク トリ 自身 の デイ スケ ッ ト 上 で の 位置 は 固定 
し て いな けれ ば な り ま せん . それ に 対し , map 
block の 位置 は ディ レク トリ か ら , Data block 
の 位置 は map block か ら 求め る こと が で きま 
すか ら こ れ は , ディ スケ ッ ト 上 の 自由 な 位置 に 
と る こと が で きま す , この 位置 は , 7. 2. 1 節 で 
説明 し た 方 法 に より , 必要 に な っ た 時 に 決め る 
こと が で きる の で す . この よう に ,。 ファ イル の 
領域 を 必要 と な っ た と き に 決定 し て 使用 する こ 
と を , 領域 の 動 的 配置 と 呼び ます . この 動 的 配 
置 の 機能 に より, ファ イル は ディ スケ ッ ト の 記 
憶 容量 が 許す 限り の 大 き さ を 取る こと が で きま 
す . それ に 対し , ディ レク トリ は , 固定 し た 位 
置 に と ら ざ る を 得 ま せん か ら , その 大 き さ も 限 
定 せ ね ば な り ま せん . ディ レク トリ の 大 き さ を 
大 きく と れ ば , ファ イル の 名 前 を た くさ ん 登録 
する こと が で きま す が , Data の 領域 は . それ だ 
け 小 さく な っ て し まい ます 。 し た が っ て 通 2 
レク トリ の 大 き さ は , 1 枚 の デイ スケ ッ ト に い 
くつ の ファ イル を 作れ る よう に する か に よっ て 
決め られ ます . 

map block の 大 き さ は , ファ イル の 長 さ に よ 
っ て 決ま る と いう 人 性 質 を 持っ て いま すか ら , 長 
き が 可変 で ある よう な 構造 を 持た せ ね ば な り ま 
せん . その た め に , ファ イル を 連結 で 表現 し た 
よう に , map block も 必要 な ら ば 連結 を 行なわ 
ね ば な り ま せん . すなわち , 1 つの ファ イル で 
使用 する map block が 1 セク タ 分 だ け で ある 
と , トラ ッ ク と セク タ の 番号 を 覚え ん る の に 1 バ 
イト ずつ 消費 する た め に , 256= 2 = ニ 128 の 長 さ 
の 連結 の 情報 し か 表現 で きま せん . つま り , 128 
セク タ の 長き さま で の ファ イル まで し か 表現 で き 
な いこ と に な り ま す . デ ィ ス ケッ ト に は 16X35 ニ 
560 セ クタ が あり ます か ら , これ だ け で は 不 十 分 
で す . この 解決 策 と し て , 1 セク タ の map block 
で は た りな い 場 合 に は , map block の 連結 を 行 
な う 情 報 を 持た せる こと に な る わけ で す 。 通常 
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この 連結 は , 双方 向 性 の リス ト に より 実現 され 
3 


map-Block 


Data Block 


この よう な 構造 を 持た せる こと に より , 1 セ 
クタ の マッ プ で 足り な く な っ た 時 に は , 決 の マ 
ッ プ を 委 照 する こと に よっ て ファ イル へ の アク 
セス が 可能 と な る わけ で す . 


7.3 Disk BASIC で の ファ イル 


管理 
7. 2 節 ま で は , ファ イル の 管理 方 法 と し て 1 
の の EE ジジ た ク 二 で の 0 ま 中 際 / だ の く 和 こ いら 
Disk 
いて 説明 し ます . 
Sb 用 の の 

いま まで は , ファ イル の 管理 の 単位 を セク タ 
単位 で 考え て まし た . その た め に , ファ イル の 


長き る が 長く な る と 連結 の 情報 の 量 も ずい ぶん と 
多く な っ て し まい ます ., Disk BASIC で は , 
8 セクタ を 1 つの 単位 と し て 管理 を 行なっ て い 
ます . この 単位 を クラ スタ と 呼び ます . その た 
め に , ファ イル 構造 は クラ スタ の 連結 と し て 表 


1 紀 選 


で は PC の 
BASIC が 実際 に 採用 し て いる 方 法 に つ 


現さ れる よう に な り ま す . また , ファ イル の 領 
域 も クラ スタ 単位 で と られ ます . 1 セク タ は 256 
バイ ト で し た か ら , 1 クラ スタ は 2K バイ ト に 
な り , 0 トラ ッ ク の 1 セクタ か ら 8 セク タ ま で 
を 0 クラ スタ ,。 34 ト ラッ ク の 9 セク タ か ら 16 セ 
クタ を 69 ク ラス タ と する クラ スタ 番号 を つけ て 
管理 を 行なっ て いま す . 
この 方 法 に よれ ば , ファ イル の 列 構 造 を 表現 
する 連結 の 情報 が 少な く て 済み ます . し か し , 
領域 の 管理 の 面 か ら み る と , 最少 の 管理 単位 が 
2K バイ ト で ある の で , どん な に 短い ファ イル 
(た と え 1 バイト で あっ て も ) で も デイ スケ ッ 
ト 上 で は 2 K バイ ト を 消費 する こと に な っ て し 
まい ます , 物理 的 に は 2K バイ ト の 整数 倍 の 領 
域 し か と れ な いこ と に な り ま す . 
632 押 2 人 0 ピグ ドミ リ 
Disk BASIC で は ディ レク トリ は , トラ ッ ク 
18 の セク タ 1] か ら セ クタ 12 ま で の 領 寺 に と られ 
て いま す . ディ レク トリ の 各 項 目 は 16 バ イト で 
表わさ れ そ の 構成 は 次 の よう に な っ て いま す . 
バイ ト 0 一 5 : ファ イル 名 (6 文字 ) 
バイ ト 6 一 8 : 拡 張子 (3 文字 ) 
9 : 属性 
10 : ファ イル エン トリ 
11 一 15 : 未 使用 


ファ イル 名 と 拡張 子 は ファ イル の 名 前 の 識別 
に 使わ れる も の で す . 属性 は , その ファ イル の 
持っ て いる 属性 を 保持 し て いま す . 属性 に は ア 
AE りり 二 NE ライ トラ イト 
プロ テク ト の 3 種類 が あり , 次 の よう に 表わさ 
れ て いま す . 

3 種 の 属性 の うち , R と P は , SET に よっ 
て 付け られ , A は , SAVE コマ ンド に よっ て つ 
けら れ ま す . 

ファ イル エン トリ は , その ファ イル の 使用 し 
て いる 最初 の クラ スタ 番号 を 持っ て いま す . 7. 
2 節 ま で の モデ ル で の 最初 の map block の 位置 


bit 7 bit 0 


未 使用 


P… ラ イト プロテクト 


R… リ ー ド ・ ア フタ ・ 
ライ ト の と き 1 
A… ア スキ ー 形 式 の 時 0 
ノン ・ ア スキ ー 形 式 

の と き 1 


の 情報 に 相当 する も の で す が , Disk BASIC で 
は , map block と 領域 管理 の た め の bit-map を 
一 緒 に し て , 次 に 説明 する FAT で 表現 し て い 
まき 

この よう に し て , 1 つの ファ イル あたり , 16 
バイ ト を 消費 し て いま す の で 12 セ クタ 分 の ディ 
レク トリ に は 最大 256-16X12= ニ 192 個 の ファ 
イル 名 が 登録 で きる こと に な り ま す . 

の 還 3 二 39 EAT 

Disk BASIC で は , クラ スタ 単位 で 管理 を す 
る だ た め に , ファ イル の 列 構造 は 。 クラ スタ の 連 
続 で 表現 され る こと は 述べ まし た . こ の た め に , 
Disk BASIC で は FAT (File Allocation 
Table) と いう 領域 を と っ て , 連結 の 情報 を 保持 
3 る こと に し て いま す . FAT は , ディ スケ ッ ト 
上 の トラ ッ ク 18 の セク タ 14 か ら セ クタ 16 ま で の 
領域 に 置か れ て いま す が , この 3 セク タ の 内 容 
は 全て 同じ に な っ て いま す . 各 セク タ の 256 バ イ 
ト の うち の 70 バ イト で FAT は 表現 され て いる 
の で す が , 安全 の た め に , 同じ も の を 3 つ 持 っ 
て いて , 3 つが 一 致し な いと その ディ スケ ッ ト 
は 使え な いよ うに し て いる の で す . 

FAT は 70 バ イト の 配列 と し て 表現 され て いま 
す が , この 70 バ イト と いう 大 き さ は , デイ スケ 
ッ ト 上 に 0 か ら 69 ま で の 70 の クラ スタ が 在 在 す 
る と いう 事実 と 符号 し て いま す . ファ イル の 最 


初 に 使用 し て いる クラ スタ の 番号 は ディ レク ト 
リ 中 に ある こと は すでに 述べ まし た が , この 番 
号 を N1 と する と , 配列 FAT の FAT (N1) 
な る 要素 に は , その 次 に 使用 する クラ スタ の 番 
号 N2 が 入っ て いる の で す . 同様 に し て FAT(N2) 
に は 3 番目 に 使用 する クラ スタ の 番号 が 入っ て 
いる と いう 具合 に し て , ディ スケ ッ ト 上 の 全て 
の ファ イル の 連結 の 情報 が FAT の 70 バ イト だ 
け で 表現 され て いる の で す . 後続 する クラ スタ 
が な い 場 合 に は , その クラ スタ 内 の 8 セク タ の 
うち の 実際 に 使用 まれ て いる セク タ 数 m( 1 ミ mS 
8 ) 192 な る 数 が 入っ て いま す . この 情報 に よ 
っ て , 最後 の クラ スタ の 何 番 目 の セ クタ ま て 達 
すれ ば ファ イル が 終わ りか が わか り ま す .192 尼 


し て いる の は クラ スタ 番号 と 区 別 す る た めで す . 


(区 に 使用 する デー タ ] 
F.A.T ! プ ロッ ク を さる す 


16byte 


ディ レク トリ 
ファ イル の 名 前 か ら 
ファ イル ・ デ ー タ の 
は いっ て いる 場所 を 
知る . 


Data Block 
(実際 の デー タ が 入っ て いる ) 


この よう に ,FAT は ファ イル の 列 構 造 の 表現 
を 行なっ て いま す が , また 同時 に 領域 の 管理 も 
行なっ て いま す . すなわち , 使用 し て いな い ク 
ラス タ に 対応 する FAT の 要素 に は , 値 と し て 
255 を 持た せ , 使用 し て いる クラ スタ と 使用 し て 
いな い ク ラス タ と を 判別 し て いる の で す . FAT 
の 要素 が と る 値 を 区 分 する と 次 の 表 の よう に な 
り ます . 
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要素 の 値 対応 する クラ スタ の 使用 状態 


0 -69 対応 する 8 セク タ 全 て を 使用 中 . 
後続 する クラ スタ を 持ち , 値 は そ 
の クラ スタ 番号 を 示す . 

193 一 200 対応 する クラ スタ は ファ イル を 


構成 する 最後 の クラ スタ で あり , 
値 か ら 192 を 引い た 数 が , 実際 に 使 
用 され て いる セク タ 数 で ある . 

254 Disk BASIC が 使用 し て いる ク 
ラス タ で あり , ファ イル 領域 と し 
て は 使用 で き な い . ディ レク トリ 
や FAT 自身 の 入っ て いる クラ ス 
タ が そう で ある . 

255 未 使用 


ジッ ルク 8W( ク ラス 36 還 37 は 縛 光 レ 
クト リ と FAT が と られ る た め に , 値 は 254 に な 
り フ ァイル 領域 と し て は 使え ませ ん が , シス テ 
ム デ ィ ス ケッ ト の 場合 に は , クラ スタ の 0 か ら 
5 まで が 254 と な り ま す . シ ステ ム デ ィ ス ケッ ト 
の 場合 に は , この 部 分 に , IPL と Disk BASIC 
が 置か れる か ら で す .TIPL と は Initial Program 
Loader の こと で , Disk BASIC を ディ スケ ッ 
ド か ら 有 モリ り リリ ベロ ニー ド Ra ある た だ ため の ジ ロク で 
す . PC は 。 リ セッ ト を する と , まず ディ スケ ッ 
ト か ら , トラ ッ ク 0 の セク タ 1 に 置か れ て いる 
IPL を 読み 込み ,。 その IPL に よっ て トラ ッ ク 
0 の セク タ 2 か ら ト ラッ ク 2 の セク タ 16 ま で に 
ある Disk BASIC を 読み 込む の で す . この よう 
に , デイ スケ ッ ト 上 に は , BASIC が 使用 する ク 
ラス タ が ある の で , ユー ザ が ファ イル 領域 と し 
て 使え る の は , デー タ ・ デ ィ ス ケッ ト (Disk 
BASIC を 含ま な いも の ) で 68 ク ラス タ , シス テ 
ム ・ デ ィ ス ケッ ト で は 62 ク ラス タ に な り ま す . 
で すか ら , ディ レク トリ に は , 1929 ま で の ファ イ 
ル 名 を 登録 で きる よう に は な っ て いま す が , 少 


し で も 長 さ の ある ファ イル な ら ば , 68 ケ (デー 
タデ ヂ ディス ケッ ト の 場合 ) の ファ イル まで し か 作 
る こと が で きま せん . それ 以上 の ファ イル を 作 
ろう と する と , Disk Full の エラ ー に な っ て し 
まい ます . 
7. 3. 4 この 節 の まとめ 

7. 3 節 の まとめ と し て , ディ レク トリ と FAT 
の 構造 を 参照 し て , ファ イル の 属性 と 使用 し て 
いる トラ ッ ク , セク タ の 番号 を 求め る プロ グラ 
ム を 作っ て み ま し た . 


この プロ グラ ム に つい て 一 応 の 説明 を し て お 
きま し ょ う . 

240 行 で ファ イル の 名 前 を 入力 し ます . 名 前 の 
入力 型式 は ロー ド や セー プ を する 時 と 同じ で ド 
ライ ブ の 指定 も つけ る こと が で きま す ( ^ で く < く 
くる 必要 は な い ). 入力 し た 名 前 か ら , 260 行 で ド 
ライ プ ブ の 指定 の 部 分 を 取り 出し , 280 行か ら 310 
行 ま で の ルー プ で ファ イル 名 と 拡張 子 を 取り 出し 
て , ディ レク トリ と の 比較 が で きる 形 に し ます . 

サ プ ブ プルー チン SEARCH は , 指定 され た ファ 
イル が は た し て ディ レク トリ 中 に 登録 され て い 
る か を 調べ ます ,. ディ レク トリ は , DSKI$ に よ 
り 1 セク タ ず つつ 読み と られ , 文字 変数 DIR$ の 
中 に 一 項目 ずつ 入れ られ ます (450 行 ). 

DIR$ の 要素 は ,、 ファ イル 名 を 持つ N$ と 比較 

され , 名 前 の サー チ が 行なわ れ ま す . 見 つか ら 
な か っ た 時 に は , セク タ の 指定 S を 1 つ 増 や し , 
次 の セク タ 内 を 調べ ます . 

サ プ ブルー チン PRINT OUT は , 指定 され た 
ファ イル の 属性 と 、 使 用 し て ぃ る 領域 を 求め 印 
字 し ます . ディ レク トリ 中 に あっ た 情報 (N$) 
の 10 番 目 の 文字 は 属性 で し た か ら ,580 行 で K に 
必 性 が 得 ら れ ま す . 

660 行 か ら 690 行 で は , 配列 FAT% に DSKI$ 
を 使っ て FAT の 内 容 を 読み 込ん で いま す . 

710 行 か ら 810 行 は FAT の 情報 を も と に 使用 
し て いる トラ ッ ク と セク タ の 番号 を 求め 印字 し 
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ます . まず 710 行 で . ディ レク トリ か ら 最 初 に 使 GT が 使用 し た セク タ 数 を カウ ント する の に 用 
用 し て いる クラ スタ 番号 が 求め られ ,740 行 -810 いら れ て いま す の で , 最 後に 820 行 で デリ ント を 
行 の ルー プ で その 番号 を も と に FAT 中 の クラ 行ない ます . 関数 FNA は 密 の 値 の 購 式 さ 敬 
スタ の 連結 の 情報 が 求め られ て いく と 同時 に , える た め の も の で PRINT USING の 代わ ゎ り 
クラ スタ 番号 か ら , トラ ッ ク , セク タ の 番号 へ に 使っ て いま す . 

の 変換 が 行なわ れ ま す . この ルー プ 内 で は 変数 


ロラ が 


100O 7※ 誠 


110 /** Hemo Froaram for Section 7 
120 /※% 


This Program Print file attribue Used Traci SEecter rt 


HAIN RIHLITINE 


CLEAR 1Q0QQ 7Recerve Strung sf 
HIHM FATZ(70) 

IEF FNA$(X)=RIGHT$(" "+ す STR$(X) 5) 

FIELL #0」SGE AS A も 


INFIT "File namei"iNA$iFRINT trnPgt f)le riamme 
FRINT "File irifarmations for "5iNA$* 
IF MI も (NA$))1) = リリ 
THEN Li=VAL(LEFT$(NA$, 1 ) ) :NA$=MTL ま (NA も ) ELLEN(NA ま うー ) 
ELSE =1 
N=" 山 
FHR 1= 1 TH ウッ net fite namme 
N1$=MIL ほ (NA ま ) エ )1 ) 
IF _N1$="。! THEN N も =N$+SFACE$(7ー1 ) 
ELSE IF N1$="! THEN N$=N$+" "ELSE N$=N$+N1$ 


NEXT 1 
N$=LEFT* キ (N あ ヵ 層 ) 


RFISELE SO Search file 
IF FINLI THEN GrEIE 55QO 
ELESE FRINT "File not foung" 


ENI 


EERHLTINE: SEARCH 


衣 =OIFTNLI=OILAET=O 


に に CSJ 
T$=HISKT ま (1)) Read dire に Sory (1 Seitoc 
HIR$=A$ / irito LIF ド $ 
F=INETR(HIR$)N$) Search file rane 
IF FXSO THEN N$=MIL も (TITR ま 」F+ キ 9 ウッ ご で) FTNL=ー1 


IF ASE(MIL(TITR ま )49) 1 ) ) =2S5 THEN LAST=ー1 
SO IF NT FIN ANLI NdT LAST THEN cdTn 44Q 
StO 症 2 


5EO_RETLRN 
10) 計 4 
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0 っ SUBRCHTINE: FRINT ロ HT 


540 7* 
9) 
fa16) AT=ASFL(LEFT$(N$, 1 ) ) 7het file attributs 
S ッ O FRINT :FRINT "ATTRIELTE:" 
600 IF ATX128 THEN FRINT "AA "5 "Llecode attrihute 
410 AT=AT FLEI 128 
JF_ AT:4S THEN FRINT "R "jiAT=AT-44 
IF AT=O THEN FRINT ELSE FRINT "F" 
FRINT 
[=LIEET 和 ま ( 1 14 ) Read Fa 
FR ji=O TI 70 rto FAT ) 
FATZ(T)=AEE(MIL あ (A ま ) エ +1,1 ) ) 
NEXT 1 
71G に =ASF( MTT も (N も 」 宜 1) ) "net file pntry 
72O FRINT ! 2 ラ ヌ クト ラ う g2 セ 27" 
PAC16】 本 =0 ツ ( 慌 ・ EE に に nn 
74Q に 1=FATX(E) UMS3N09uee0nt 
0 IF C1270 THEN J=8B ELEE = に 1 MEI 14 
760 還 =( ビ ML 2) x+1 : ビ 本 = ビ T+J 
770 FR 1=1 T ロ J 
780 FRINT FNA ま (に ) jiFNA も (本) 5FNA$( 王 ) 
70 ご =+ 1 
に 1916) NEXT 1 
gg10 IF FE1 く 70 THEN =C1 inHT ロ 740 
20 FRINT:iPRINT FET"Eector llsed" 
に た 10) 請 


40 RETLURN 


実行 結果 
Fuh 2 
File namei? demo ile namei? fdump 
File informations for demo File informations for fdumP 
ATTRIELITE : ATTRIEUTEIAF 
7 ラス グ トラ ゅ 7 セ 27 2 ラメ 9 トラ ゅ 7 セ 77 
38 1 ウツ 1 39 19 
3g 1 ウ 2 9 19 10 
38 1 ウ 3 
3 紀 1 ウ 4 2 Sector Llsed 
38 19 ) ロ k 
38 1 ヶ 6 Fun 
38 1 ウツ 7 File namei? Prin2、aSc 
コロ 1 品 
40 20 | File informations for PFin2.ASC 
40 20 2 
40 20 3 ATTRIELTE:A 
11 Sector lsed 2329 トラ ゅ 7 セ 77 
ロ nk 32 14 1 


1 Sector llsed 
LE 
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7. 4 ファ イル 構造 と コマ ンド , ス 
テー トメ ント と の 関係 


7. 3 節 ま で で , ファ イル の 構造 と その 管理 
方 法 が わか り ま し た の で で は , それ ら と 
コマ ンド や ステ ー ト メン ト と の 関係 を 考え , 具 
体 的 に どの よう な 働き を し て いる の か 説明 し ま 
し は 9 炉 


ーー 
9 いい ニー 


7 。 
InoOunt 


4. 1 MOUNT, REMOVE 

は ディ スク の 使用 開始 宣言 で し た . 
mnount に より , BASIC は 指定 され た ドラ イブ 中 
の ディ スケ ッ ト の FAT を メモ リ 中 に ロー ド し 
ます .FAT は ファ イル の 参照 の 度 に 必ず 必要 と 
を る 情報 で すか ら , メモ リ 中 に ロー ド し て お く 
の で ぐす 。 PC で は , ドラ イプ は 4 台 ま で つなげ る 
ご と が で きま す の で , FAT を ロー ド し て 使う メ 
モリ 領域 も 4 台 分 準備 され て お り , 決め られ た 
場所 に ロー ド さ れ ま す . 

一 方 remove は , メモ リ 中 の FAT を ディ ス 
ケッ ト に 書き 込む 仕事 を 行ない ます . 新しく フ 
ァイル を 作っ た り , 書き 込み を 行なっ た 時 に は , 
ディ スケ ッ ト の 使用 状況 を 表わす FAT の 内 容 
も 変化 し て いる は ず で すか ら , ディ スケ ッ ト を 
ドラ イブ か ら 取 り 出 す 前 に は , remove に より , 
FAT の 内 容 の 更新 を 必ず 行なわ な けれ ば な ら な 
いふ ので す . mount し た ディ スケ ッ ト に 対し て 読 
作出 し し か 行なわ な か っ た 場合 に は , FAT の 内 
答 は 全く 変化 し ませ ん か ら ,remove を せ ず に デ 
イス ケッ ト を ドラ イブ か ら 取 り 出 し た リリ セッ ト 
を か けた り し て も 大 丈夫 で す . し か し , remove 
を し な いで ディ スケ ッ ト を 差し 換え て 使う と , 
ダメ モリ 中 に ある FAT は も と の ディ スケ ッ ト の 
FAT で すか ら , 正 し く フ ァイル を 扱う こと が で 
き な く な っ て し まい ます . 

remove の し 忘れ に よっ て どの よう な 事故 が 発 
生 す る か を 考え て み ま し ょ う ). 


1. mount し た ディ スケ ッ ト に 対し て 読み 出し 
し か 行なわ な か っ た 状態 で 別 の ディスケット 
と 入れ 換え て remove し た 時 . 

2. mount し た ディ スケ ッ ト に 対し て 書き 込み 
も 行なっ た 状態 で 別 の ディ スケ ッ ト を 入れ か 
えて remove し た 場合 . 

1 の 場合 に は , も と の ディ スケ ッ ト に 対し て 
は , FAT の 内 容 は 変化 し て いな い の で すか ら 
何 も 問題 は あり ませ ん . 一 方 , 後 で 入れ 換え た 
ディ スケ ッ ト の 方 は , remove に より , も と の デ 
ィ ス ケッ ト の FAT の 内 容 が 書き 込ま れ て し ま 
い 本 来 の FAT の 情報 は こわ され て し まう こと 
に な り ま す . つま り , 入れ 換え た 方 は 使い も の 
に な ら な く な っ て し まい ます . 

2 の 場合 に は , 1 と 同様 の 理由 か ら 入 れ 換え 
た 方 の ディ スケ ッ ト は ダメ に な り ま す . 一 方 も 
と の ディ イス ケッ ト に は , 到 命 的 な 損害 は あり ま 
せん が , 書き 込み を 行なっ た 情報 は , 実際 に は 
ディ スケ ッ ト 上 に 記録 され て いる に も か か わら 
ず . それ を 参照 する た め に 必要 な FAT の 情報 
が な いた め に 書か れ な か っ た と 同じ こと に な っ 
で 要 淫 V% 事 ず 。 

7. 4. 2 NAME, KILL, SET 

ファ イル の 名 前 が 登録 され て いる の は , ディ 
レク トリ で し た か ら , ファ イル 名 の つけ か える を 
行 な ) NAME は , ディ レク ト の 書き か え を 行 
な うこ と で 実現 され る の は 簡単 に わか る で し ょ 
う . それ に 対し , KILL で は , ファ イル 名 の 削 
除 と 使用 し て いた 領域 の 解放 を 行なう 必要 が あ 
り ま すか ら , ディ レク トリ と FAT の 両方 に 働 
きか ける こと に な り ま す 請 まず デイ レク 人 当 ) 
中 か ら , KILL する ファ イル を 探し 、 そ の 項目 を 
0 に し ます . この 0 は KILL し た ファ イル だ と 
いう 目印 で す . FAT の 方 は ディ クト リ か ら の ク 
ラス タ 番 号 を た どっ て いき , 対応 す る 要素 を 255 
に する こと で , 領域 の 解放 が 達成 され ます .SET 
に よる ファ イル 属性 の 設定 も 、 デ ィ レ クト リ へ ヘ へ 
の 書き 込み を 行なう) だ け で す . 
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7 4 3 OPEN 証 POSE 
OPEN は ファ イル の 使用 を 可能 に する た め に 
次 の よう な 仕事 を 行ない ます . まず ディ レク ト 
リ を 調べ 。 ファ イル が 見 つか っ た 場合 に は , そ 
の ファ イル に 関す る 情報 (ファ イル エン トリ と 
属性 ) を メモ リ 中 の ファ イル ディ スク リプ タ 
と 呼ば れる 場所 に セッ ト し ます . ファ イル が な 
い 時 に は , モー ド に 応じ て , エラ ー を 出す か , 
新しく ファ イル を 作り ます . また , バッ ファ の 
割り 当て も OPEN の 重大 な 仕事 の 1 つ で す が , 
PC の Disk BASIC で は ファ イル 番号 の 指定 
が , その まま バッ ファ の 割り 当て に 相当 し ます . 
ファ イル ディ スク リプ タ と は , ファ イル 操作 の 
た め に 必要 な 情報 を 保持 し て お くだ た め の 和 領域 で 
バッ ファ と 連続 し た 領域 に と られ ます . その 内 

容 の 基本 的 な も の は 次 の 5 種類 で す . 


@File entry 

これ は , ディ レク トリ 中 の も の を コピ ー し た 
も の で , その ファ イル の 使用 する 領 域 が どこ の 
クラ スタ か ら 始 まる か を 示す も の で す . 7. 3 
節 の プロ グラ ム で も 示し た よう に , この 情報 が 
あれ ば , ファ イル の 大 き さ も 知る こと が で きま 
す . そこ で , LOF 関数 の 値 を 求め る 場合 に 用 い 
られ ます . 


@eNext R ン W block 

次 に 読み 書き すべ き ト ラッ ク , セク タ の 番号 
を 保持 し ます . 入力 の 際 に バッ ファ が 空 で ある 
場合 また は , 出力 の 際 に バッ ファ が 一 杯 に な っ 
て いる 場合 に は , この 情報 の 示す トラ ッ ク , セ 
クタ に 対し て 読み 書き が 行なわ れる わけ で す . 
PC の 場合 に は , クラ スタ 番号 と 。 クラ ス 内 の 位 
置 (0 一 7 の 数 ) の 2 バイ ト で 表現 きれ ます . 
ディ スク に 対す る 読み 書き が 行なわ れる 度 に ク 
ラス タ 内 の 位置 が 1 つ 増 や され , 7 ま て 進む と 
0 に 戻っ て クラ スタ 番号 が 1 つ 増 や され ます . 


この 2 つの 情報 か ら ト ラッ クセ クタ 番号 へ の 変 
換 の し か た は , 7. 3 節 の アロ グラ ム に ある と 
お り で す . この 情報 は , LOC 関数 の 返す 値 に 相 
当 す る も の で す . 


LOC 関数 の 値 = ニ クラ スタ 番号 *8 
+ ク ラス タ 内 位置 


OPEN 動作 は この 情報 の 初期 設定 を 行ない ま 
す . す な わ ち , APPEND の モー ド で は file entry 
を たどり, ファ イル の 終り を 見 つけ て それ に 
続く 値 を セッ ト し , その 他 の 時 に は file entry の 
値 そ の も の に な り ま す . 


@Next R/W byte 

次 に 読み 書き を する バッ ファ 内 の 位置 を 示し 
ます . バッ ファ は 1 セク タ 分 , 256 バ イト で すか 
ら こ の 情報 は 1 バイ ト で 表わさ れ ま す . OPEN 
時 に は , 0 に セッ ト さ れ , PRINT や ゃ INPUT が 
あっ た 場合 に は , この 情報 の 示す バッ ファ 上 の 
位置 に 対し て 入出 力 を 行ない , 読み 書き を 行 な 
っ た バイ ト 数 分 だ け 値 を 増やし ます . 値 が オー 
バー フロ ー し た 時 は , バッ ファ が 空 (入力 時 ) 
また は 一 杯 (出力 時 ) に な っ た と いう こと で す 
か ら , バ ッ フ ァ の 内 容 を NextR/W block の 
示す ディ スク 上 アド レス に 読み 書き し ます . 


@ 属性 

バッ ファ の 属性 を 保持 し ます . OPEN 時 に は 
ディ レク トリ 中 の 属性 を コピ ー し 初期 設定 し ま 
す . SET に よっ て バッ ファ に 属性 が つけ られ た 
り , 変更 され た 場合 に は , この 情報 が 変化 する 
わけ で す . 


@ モ ー ド 

ファ イル が どの モー ド で オー プン され て いる 
か を 示す 情報 で 、INPUT, OUTPUT, 
APPEND, ラン ダム の 5 つの 状態 の いずれ か 1 
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つ を 示し ます . OPEN 時 に は , その モー ド の 指 
定 に 応じ て 後者 4 つの いずれ か の 状態 に セッ ト 
され , クロ ー ズ 時 に クロ ー ズ 状態 に セッ ト さ れ 
ます . 入出 力 を 行なう 時 は , この モー ド が クロ 
ー ズ 状態 で な いこ と を 確 め て か ら 行 な われ , ク 
ロー ズ 状 態 の 時 に は File not open の エラ ー が 
だ され る わけ で す . 

CLOSE は , ファ イル の 使用 し て いた , バッ フ 
ァ の 後 片 づ け を 行なう も の で す . すなわち バッ 
欠 久 内科 で クリ ヤ し ,。 フ ァイル ディ スク リプ 
タ の モー ド を クロ ー ズ 状態 に セッ ト し ます . フ 
ァイル が 出力 用 に オー プン され て いた 場合 に は , 
バッ ファ を クリ ヤ す る 前 に 重用 な 仕事 が あり ま 
す . 1 つ は , バッ ファ 内 の 情報 の は き 出 し で す . 
出力 時 に は , バッ ファ が 一 杯 に な る まで は ディ 
スク へ の 書き 込み は 行なわ れ ま せん か ら , CLOSE 
する 時 に は , バッ ファ に は ディ スク に 書き 込ま 
ね ば な ら な い デ ー タ が 残っ て いる こと が あり ま 
す . し た が っ て CLOSE で は これ を 書き 込ん で 
や ら ね ば な り ま せん . また 同時 に ファ イル の 終 
わり の 目印 を つけ て や る 仕事 も 必要 で す . これ 
は , 入力 時 に EOF の チェ ッ ク を 行なう た め に 
基 非 と も 必要 で す . 結局 Disk BASIC で は 
CLOSE 時 に 次 の よう な 処理 を 行なう こと に な り 
ES 康 


ファ イル に 書き 込み を し て いな けれ ば バッ フ 
を クリ ヤ や し て , モー ド を クロ ー ズ 状態 に し て 
処理 を 終る . 

書き 込み を し た の で あれ ば , Next RW byte 
の 示す 位置 に EOF の 目印 と し て 16 進 で 1 A を 書 
き 込 み 。 バッ ファ の 残り を 全て クリ ヤ す る . 次 
に この バッ ファ の 内 容 を Next RW block の 
示す ディ スク 上 アド レス に 書き 込む . 最後 に バ 
ッ フ ァ を クリ や ヤ し, モー ド を クロ ー ズ 状態 に し 
て 処理 を 終る . 


7. 4. 4 PRINT# INPUT+ 

も うす で に 述べ た よう に PRINT# は パッ フ 
ァ へ の 出力 , INPUT# は バッ ファ か ら の 入力 を 
行ない ます . INPUT# で バッ ファ の 内 容 を 全て 
読ん だ と き は , Next RW block の 示す ディ 
スク 上 の アド レス か ら バ ッ フ ァ へ の 読み 込み で 
行ない ます . Next RW block の 値 の 更新 は , 
クラ スタ 内 位置 を 1 つ 増 や すこ と に よっ て 行 な 
われ ます が , 7 を 越え た 時 に は FAT を 参照 し 
て 次 の クラ スタ 番号 を 求め ます . 
PRINT# の 時 に は , バッ ファ が 一 杯 に な っ た 
時 点 で ディ スク へ の 書き 込み を 行ない クラス 
タ 内 位置 が 7 を 越え た 時 に は FAT を 調べ て , 
末 使 用 クラ スタ を 探し だ し , Next R ノ W block 
に セッ ト す る 仕事 を 行なう こと に な り ま す . 


7. 4. 5 PUT# GET# 

PUT, GET は バッ ファ の 状態 に 関係 な く デ 
ィ ス ク へ の 出力 を 行なう と 考え れ ば , PRINT# 
INPUT# と 同じ よう な こと だ と いう こと が お わ 
か り に な る で し ょ う . レコ ー ド 番号 が 指定 され 
た 時 に は , file entry か ら レ コー ド の 数 ぶん だ け 
FAT 内 の ファ イル の 連結 の 情報 を た どっ て いけ 
ば よい わけ で す . 
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ーー 一 APPENDIX ムー 一 


meー た ーッ ク リス ト 


ここ で は ディ スク 関係 の エラ ー の 意味 と その 主 な 発生 原因 を 挙げ て お きま す . その 他 の エラ ー に 
つい て は PC #1 を 参照 し て くだ さい . 


ERR コー ド : 50 Field overflow 
意味 : FIELD 文 で 256 バ イト 以上 の 文字 を 割り 当て た . 
原因 : 1 つの FIELD の 大 きき は 256 バ イト で ある の に 対し , FIELD 文 で の 割当 て の 合計 が これ 
を 越え て いる . 
フィ ー ル ド の 構成 を 変更 し て 256 バ イト 以内 に お さめ て , また は , 複数 の FIELD 文 を 用 
いて 処理 する こと を 考え る . 


ERR コー ド : 51 Internal error 
意味 : BASIC 内 部 で の エラ ー 
原因 : 通常 この エラ ー は 発生 し な い . 


ERR コー ド : 52 Bad file number 
意味 : ファ イル 番号 が まち が っ て いる . 
原因 : 指定 し た ファ イル 番号 が 0 か ら BASIC の 起動 時 に 定め た 上 限 ま で の 間 に な い 、 
: シー ケン シャ ルフ ァイル で の ファ イル 操作 に ファ イル 番号 0 を 使 お うと し た . 
ポイ ント : BASIC の 起動 時 の 上 限 に 指定 を せ ず に リ ター ン す る と ファ イル 数 は 5 まで に 制限 され る . 
0 番 は DSKI$, DSKOS で の み 使 うこ と が で きる . 


ERR コー ド : 53 File not found 
意味 : 指定 され た ファ イル が 見 つか ら な い 
原因 : OPEN,。 LOAD, KILL 等 で 指定 し た ファ イ ル が 存在 し な い . ファ イ ル 名 は 大 文字, 小 交 
字 も 区 別 す る こと に 注意 . ドラ イブ の 指定 を 忘れ る こと も 多い . 


ERR コー ド : 54 Bad file mode 

意味 : ファ イル の モー ド が まち が っ て いる . 

原因 : 非 ア スキ ー 形 式 の ファ イル を MERGE し よう と し た だ . 
アス キー 形式 で SAVE し な お す . 

( 例 ) SAVE "ファ イル 名 7”, a 
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ERR コー ド : 55 File already open 
意味 : 指定 され た ファ イル は すでに オー プン され て いる . 
原因 : 同一 の ファ イル を 2 回 オー プン し よう と し た . 
・ す で に 使用 中 の ファ イル 番号 を 指定 し て ファ イル を オー プン し よう と し た . 
・ オ ー プ ン し て いる ファ イル を KILL し ょ うと し た . っ CLOSE する . 


ERR コー ド : 56 Disk not mounted 


意味 : 指定 され た ディ スク は MOUNT され て いな い . 
原因 : MOUNT の し 忘れ . 


・ フ ァイル 名 中 で ディ スク 指定 を 忘れ て いる . 


ERR コー ド : 57 Disk | ン 0O error 
意味 : ディ スク へ の 入出 力 中 に エラ ー が 生じ た . 
原因 : ディ スク へ の 入出 力 の 際 に は , エラ ー が 生じ て も , BASIC は 10 回 まで の 再 試行 を 行なっ て 
(ES 鹿 それ で も エラ ー が 回 復 不可 能 な 場合 に エニ ラー と な り ま す . この エラ フー が 出る よ 
うに な っ た ディ スケ ッ ト は フォ ー マ ッ ティ ング を し 直す か , 使用 時 間 が 多けれ ば 廃棄 処分 
に し た 方 が 良い で し ょ う ). 
ERR コー ド : 58 File already exists 
意味 : 指定 され た ファ イル 名 は すでに 存在 し て いる . 


原因 : NAME で ファ イル 名 を 変更 する さ い に 指 定 さ れ た 新 フ ァイル 名 と 同じ 名 前 を 持つ ファ イル 
が すでに 存在 し て いる . 


時 計 22 上 2 


ERR コー ド : 59 Disk already mounted 
意味 : 指定 され た ディ スク は すでに MOUNT され て いる . 
原因 : 1 つの ディ スケ ッ ト を 複数 回 マウ ント し よう と 陽 


・ プ イィ スケット を 入れ 奉 え て mount し よう と し た 場合 は 。 前 に 使用 し て いた ディ スケ ッ ト を 
remove し 忘れ て いる と いう こと で ある . 


ポイ ント :remove の し 忘れ の 場合 も ある こと ( 


こ 注 意 , エラ ー の 原因 が 上 記 の 2 つの どちら か で ある 
の DK2AS と P の らら 。 


ERR コー ド :60 Disk ful 
意味 : 指定 され た ドラ イブ 中 の ディ スケ ッ ト の 記憶 領域 が 一 杯 に な っ た . 


原因 : ファ イル を た くさ ん つく っ て 記憶 領 城 が 足り な く な っ た . また は ファ イル の 長 さ が 長 てく な 
っ て 入り きら な く な っ た . 


ーー 不要 の ファ イル は kill する | それ で も だ め な ら ば , 新しい ディ スケ ッ ト ま た は ,。 あ まり 
ファ イル を 作っ て いな い デ ィ ス ケッ ト を 使用 する . 
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: PUT# で 指定 し た コー ド 番 号 が 大 ほす ぎる . 
BASIC は 指定 し た レコ ー ド 数 だ け の 領 寺 を と ろう と する の で , あま り 大 き な 番 号 を 指定 す 
る と 記憶 領 寺 が だ 足ら な 〈 く な る . 


ERR コー ド :61 Input past end 
意味 : ファ イル の 長 さ を 越え て , ファ イル を 読も うと し た . 
原 囚 : EOF を 越え て INPUT# で 入力 し よう と し た . 
: GET# で 指定 し た レコ ー ド 番号 が ファ イル の 大 きき (LOF の 返す 値 ) を 越え て いる . 
ポイ ント : シー ケン シャ ルフ ァイル で は , INPUT# の 前 に EOF の チェ ッ ク を 行なう) こと. ラ ンダ 
ム フ ァ イル で は , ファ イル を オー プン し た な ら ば , LOF で レコ ー ド 番号 の 最大 値 を 調べ て 
うく 人生 


ERR コー ド : 62 Bad file name 
意味 : 指定 され た ファ イル 名 は , ファ イル 名 と し て 不適 切な も の で ある . 
原因 : ファ イル 名 が ヌル スト リン グ で ある . 
・ フ ァイル 名 中 に コン トロ ー ル 文字 が 含ま れ て いる . 
ポイ ント : ファ イル 名 を 文字 変数 や 文字 式 で 表わす 場合 に ヌル コー ド が 入っ た りす る こと が ある の 
GE 洋 ' る こと 。 


ERR コー ド : 63 Direct statement in file 
意味 : ファ イル 中 に ダイ レク トス テー トメ ント が 検出 され た . 
原因 : プロ グラ ム の LOAD 時 に , ダイ レク トス テー トメ ント が 検出 され た . 
プロ グラ ム フ ァ イル で な い フ ァイル を ロー ド し よう と し た の で は な いか . 
: プロ グラ ム の MERGE 中 に ,。 ダイ レク トス テー トメ ント が 検出 され た . 
MERGE で 指定 する ファ イル は , アスキー 型式 の プロ グラ ム フ ァ イル で な けれ ば な ら な い 、 


ERR コー ド :64 Bad allocation table 
意味 : ディ スケ ッ ト 中 の FAT が 破壊 され て いる . 
原因 : DSKO$ で FAT に 対し て 書き 込み を 行なっ た り , ディ スケ ッ ト の 保存 状 問 が 悪く 記録 が 失 
な われ た 等 の 原因 が 考え を られる. いずれ に し て も この エラ ー が 起き た な ら ば , その ディ ス 
ケッ ト は フォ ー マ ッ ティ ング を 行なわ な いと 使用 不可 能 で ある . 


ERR コー ド :65 Bad drive number 

意味 : ドラ イブ 番号 の 指定 が まち が っ て いる . 

原因 : ドラ イブ 番号 の 指定 に お いて PC に つなが っ て いな い ド ライ ブ の 番号 を 指定 し て いる . 
ドラ イブ 番号 は 。 ドラ イブ 2 台 の 時 は 1 また は 2 , 4 台 の と き は 1 一 4 の いずれ か で な 
けれ ば な ら な い 
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ERR コー ド :66 Bad track プ sector 
意味 ・ ト ラック , セク タ 番 号 の 指定 が まち が っ て いる . 
原因 : DSKI$, DSKOS に お いて トラ ッ ク , セク タ 番 号 の 指定 が 存在 し な いも の を 指定 し て いる . 
ポイ ント : トラ ッ ク 番 号 は 0 か ら 35 ま で . 
セク タ 番 号 は 1 から 16 の 間 で な けれ ば な ら な い . 


ERR コー ド : 67 Deleted record 
意味 : 消去 済み の レコ ー ド を 扱 お うと し た . 
原因 : 通常 この エラ ー は 発生 し な い . 


ERR コー ド : 68 Rename across disks 
意味 : NAME の ファ イル 名 指定 が 複数 の ドラ イブ に また が っ て いる . 
原因 : 同上 . 新旧 の ファ イル 名 の 指定 は 同一 の ドラ イブ で な けれ ば な ら な い . 


ERR コー ド :69 Sequential after put 
意味 : PUT し た 後 で シー ケン シャ ルフ ァイル に 対す る 操作 を 行なっ た . 
原因 : PUT し た 後 。 PRINT# INPUT# を 用 いた . 
PUT の 後に 一 度 GET を 行 な を ば この エラ ー は で な い . シー ケン シャ ルフ ァイル の 操作 と 
ラン ダム ファ イル の 操作 を 混用 し な いよ うに する の が 最も 好ま し い . 


ERR コー ド : 70 Sequential 1/0 only 
意味 シーケンシャル 入出 力 し か 行なっ て は な ら な い . 
原因 : 通常 この エラ ー は 発生 し な い . 


ERR コー ド :71 File not OPEN 
意味 : 指定 され た ファ イル は OPEN され て いな い . 
原因 : OPEN の し 忘れ . 
OPEN する ファ イル 番号 の 指定 まち が い . 


ERR コー ド : 72 File write protcted 
意味 : 指定 され た ファ イル に は 書き 込み 禁止 属性 (P 属 性 ) が つけ られ て いる . 
原因 : P 属 性 の つい た ドラ イブ 中 の ファ イル , また は PF 属性 の つい た ファ イル を KILL し よう と し 
7 選 。 
KILL する 必要 が ある と き に は まず SET で 属性 を 解除 する . 
・P 属 性 の つい た ドラ イブ , ファ イル , ファ イル 番号 に 対し て , PRINT# ま た は PUT# で 書 
き 込 み を 行 な お うと し た . 
ERR コー ド : 73 Disk offline 
意味 : 指定 され た ディ スク は つなが っ て いな い . 
原因 : 通常 この エラ ー は 発生 し な い . 
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ディ スク 1 プ 0 ルー チン の 呼び 方 

機械 語 で ディ スク に 対す る 入出 力 を 行ない 方 の た め に , ディ スク 入出 力 ルー チン の エン トリ ポイ 
ント と コー リン グ シ ー ケ ンス を 紹介 し て お きま す . 
@INITDS (OO0D2H). 

コン トロ ー ラ を 初期 化す る . 同 時 に ディ スク が 何人 台 つ な が っ て いる か を 調べ て A レ ジス タ に 入れ て 
戻る . 他 の レジ スタ は 破壊 され な い . 
@ePSHYDIO (0099H) 

ワ ィ スク 入出 力 ル ー チ ン . 各 レ ジス タ に 次 の 値 を 設定 し て か ら コ ー ル する . 

B, じ : トラック 番号 を B, セク タ 番 号 を C に 入れ る . 

D,E : デー タ の 転送 開始 アド レス を 入れ る . 

人 : 入出 力 を 行なう セク タ 数 を 入れ る . 
PSW : 入出 力 の 種類 を 指定 する . 


C= 1 : Write data 
ノニ 0 :Read data 
クニ 1 : Check data (ベリ ファ イ ) 


ドラ イブ の 指定 は EDC6 番地 の 内 容 で 行なう . 0 で ドラ イプ 1, 3 で ドラ イブ 4 が 選択 され る . 
まだ た EDC5 番地 は エラ ー 回 数 の カウ ンタ と し て 使用 され て いる の で 事前 た クリ ア し て お く こ と . エ 
ラー 回 数 が 10 回 を こえ る と エラ ー メ ッ セ ー ジ (Disk 【/0 error) が 出さ れる . リタ ー ン 時 に は CY 
多 4 シ ルク グ 2 の スミ テ ー タス を 示す . 

CYー 1 な ら ば エラ ー が 発生 し た こと を 示し . 
CYー 0 な ら ば な か っ た こと を 示す . BC レジ スタ は 破壊 され な い . 
使用 例 - ド ライ ブ 2 の トラ ッ ク 0 , セク タ 1 を 読み C000 番地 以降 に ロー ド す る . 


LD DE, 0COOH 
LD BC, 0001H 
LD 人 A 

LD (0OEDC6H), A 
OR A 

CALL 0099H 
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ディ スケ ッ ト を 両面 使う 方法 

普通 市 販 さ れ て いる ディ スケ ッ ト は , 裏表 と も に , ヘッ ドア クセ ス ホ ー ル が つい て いま す が , FC 
で は 表側 、 すなわち ラベ ル の 貼っ て ある 側 し か 使用 する こと が で きま せん . し か し 吾 側 に も 磁性 体 
が コー ティ ング し て あり ます か ら , 少し 加工 を 加え る こと に より 使用 可能 と な り ま す . 

ディ スケ ッ ト の 裏側 を 使用 する に は 次 の 手続 き を 施し て くだ さい . 

1 . 裏側 に も ライ ト ・ プ ロ テ ク ト ・ ノ ッ チ を つけ る . 

2 、 同じ く イ ン デ ックス ホー ル 検 出 用 の 穴 を あけ る . 

3, シス テム に 付属 の format プロ グラ ム に より フォ ー マ ッ ティ ング を 行なう . 


まず 1 で ライ ト プ ロ テク トノ ッ チ を つけ な いと , ディス ケッ ト 豪 面 へ の 書き 込み が 行 な を ませ ん . 
左右 対称 な 位置 に 正しく 穴 を あけ て くだ さい . 2 の イン デック ス ホ ー ル 検出 内 の 穴 は 通常 の 読み 書 
き の 時 に は 不用 な の で す が , ディ スケ ッ ト の フォ ー マ ッ ティ ング を する 時 に は 必要 な の で 必ず あけ 
て くだ さい . 穴 を あけ る の は ジャ ケッ ト だ け で , 記憶 媒体 に は あけ て は いけ ませ ん . 本 体 に 穴 傷 
が で きる と , フォ ー マ ッ ティ ング が 正しく 〈 行なえ なくなっ た り , 回 転 が な め ら か に な ら な 〈 く な っ た 
り し ます か ら 注 意 す る こと . ジャ ケッ ト に は 裏表 と も 対称 な 位置 に 正しく 穴 を あけ る こと . 

穴 を あけ た な ら ば format プロ グラ ム に より フォ ー マ ッ ティ ング を し て , で き あ がり. 表側 と 同 
様 に 使え を る は ず で す . 


1. 対称 的 な 位置 に 
裏側 用 の ライ ト 
プロ テク トノ ッ 


チ を つけ る . diskette 
錠 


2. 同じ く 対 称 な 位 
置 に 九 穴 を あけ 
る . 
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本 番 の 一 部 ある い は 全部 に つい て . 株 式 会 社 ア スキ ー 出 版 か ら 交 
秋 に よる 許諾 を 得 ず に 、 い か な る 方 法 に お いて 6 無断 で 拉 写 。 複 
製 す る こと は 禁じ られ て いま す . 


本 の 注文, 発送 に つい て は 業務 部 、 番 籍 の 内 容 に つい て は 出版 部 。 


上 記 の いずれ か に 電話 し て 下さ い . 


ど 


アス キー 出版 


